VandenBroeck and Keller, Equation (23)

Time bar (total: 18.1s)

start0.0ms (0%)

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

analyze461.0ms (2.5%)

Memory
28.7MiB live, 550.5MiB allocated; 46ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
0%0%99.9%0.1%0%0%0%4
0%0%99.9%0.1%0%0%0%5
12.5%12.5%87.4%0.1%0%0%0%6
15.6%15.6%84.3%0.1%0%0%0%7
16.7%15.6%78%0.1%0%6.2%0%8
25%23.4%70.2%0.1%0%6.2%0%9
29.7%26.9%63.6%0.1%0%9.4%0%10
30.8%26.9%60.5%0.1%0%12.5%0%11
35.9%31.4%56%0.1%0%12.5%0%12
Compiler

Compiled 29 to 22 computations (24.1% saved)

sample2.0s (11.2%)

Memory
36.2MiB live, 2 991.8MiB allocated; 281ms collecting garbage
Samples
1.6s8 256×0valid
52.0ms327×0invalid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-pow: 246.0ms (18.3% of total)
ival-mult: 233.0ms (17.3% of total)
ival-tan: 226.0ms (16.8% of total)
ival-sin: 224.0ms (16.7% of total)
ival-div: 192.0ms (14.3% of total)
ival-add: 130.0ms (9.7% of total)
ival-neg: 75.0ms (5.6% of total)
exact: 12.0ms (0.9% of total)
adjust: 3.0ms (0.2% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain254.0ms (1.4%)

Memory
-12.1MiB live, 477.1MiB allocated; 12ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
730-0-(pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
380-0-(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
00-0-(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
00-0-#s(literal 1 binary64)
00-0-(+.f64 (*.f64 F F) #s(literal 2 binary64))
00-0-(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
00-0-(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
00-0-(*.f64 F F)
00-0-(*.f64 #s(literal 2 binary64) x)
00-0-(neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
00-0-F
00-0-(tan.f64 B)
00-0-(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
00-0-(+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
00-0-(/.f64 F (sin.f64 B))
00-0-#s(literal 2 binary64)
00-0-(/.f64 #s(literal 1 binary64) (tan.f64 B))
00-0-x
00-0-B
00-0-(sin.f64 B)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
pow.f64(pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))oflow-rescue730
(*.f64 F F)overflow73
(+.f64 (*.f64 F F) #s(literal 2 binary64))overflow73
(+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))overflow73
*.f64(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))n*o380
Confusion
Predicted +Predicted -
+590
-21176
Precision
0.7375
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+5900
-210176
Precision?
0.7375
Recall?
1.0
Freqs
test
numberfreq
0176
149
231
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
91.0ms512×0valid
Compiler

Compiled 265 to 64 computations (75.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-mult: 12.0ms (17.8% of total)
ival-div: 11.0ms (16.3% of total)
ival-sin: 10.0ms (14.8% of total)
ival-tan: 10.0ms (14.8% of total)
ival-pow: 10.0ms (14.8% of total)
ival-add: 6.0ms (8.9% of total)
ival-neg: 6.0ms (8.9% of total)
exact: 1.0ms (1.5% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess183.0ms (1%)

Memory
-1.2MiB live, 188.4MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
083250
1251212
2692212
31864212
46655212
02024
03724
17121
216821
345221
4134221
5521121
0819819
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
Outputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)) (/.f64 (neg.f64 x) (tan.f64 B)))
Symmetry

(negabs B)

Compiler

Compiled 27 to 20 computations (25.9% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.3%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
Compiler

Compiled 27 to 20 computations (25.9% saved)

series46.0ms (0.3%)

Memory
-12.9MiB live, 81.4MiB allocated; 3ms collecting garbage
Counts
20 → 127
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
x
(/.f64 #s(literal 1 binary64) (tan.f64 B))
#s(literal 1 binary64)
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
(*.f64 F F)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F (sin B))))
#s(approx F #s(hole binary64 F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* F F) 2) #s(hole binary64 2))
#s(approx (+ (* F F) 2) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ 1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* F F) 2) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) 2) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ -1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* 1/6 (* (pow B 2) F))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
Calls

9 calls:

TimeVariablePointExpression
9.0ms
x
@inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2))
6.0ms
x
@-inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2))
6.0ms
F
@inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2))
5.0ms
B
@0
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2))
4.0ms
F
@0
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2))

rewrite150.0ms (0.8%)

Memory
12.0MiB live, 155.1MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07155959
07415431
042914907
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
147 → 197
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
x
(/.f64 #s(literal 1 binary64) (tan.f64 B))
#s(literal 1 binary64)
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
(*.f64 F F)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F (sin B))))
#s(approx F #s(hole binary64 F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* F F) 2) #s(hole binary64 2))
#s(approx (+ (* F F) 2) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ 1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* F F) 2) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) 2) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ -1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* 1/6 (* (pow B 2) F))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
Outputs
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))))
(fma.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(fma.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(fma.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(fma.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 (/.f64 F (sin.f64 B))) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(+.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
x
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
#s(literal 1 binary64)
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(/.f64 (*.f64 F (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sin.f64 B))
(/.f64 (neg.f64 F) (neg.f64 (sin.f64 B)))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x))) (-.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))
(/.f64 (+.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x)) (*.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(fma.f64 (pow.f64 F #s(literal 1 binary64)) (pow.f64 F #s(literal 1 binary64)) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)))
(fma.f64 (neg.f64 F) (neg.f64 F) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)))
(fma.f64 (fabs.f64 F) (fabs.f64 F) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
(fma.f64 F F (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)))
(fma.f64 x #s(literal 2 binary64) (fma.f64 F F #s(literal 2 binary64)))
(-.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))
(+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
(+.f64 (*.f64 F F) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) x) (fma.f64 F F #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 F #s(literal 4 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 F F) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 F #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 F F)))
(/.f64 (+.f64 (pow.f64 (*.f64 F F) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 F F) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 F #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 F F)))))
(fma.f64 (pow.f64 F #s(literal 1 binary64)) (pow.f64 F #s(literal 1 binary64)) #s(literal 2 binary64))
(fma.f64 (neg.f64 F) (neg.f64 F) #s(literal 2 binary64))
(fma.f64 (fabs.f64 F) (fabs.f64 F) #s(literal 2 binary64))
(fma.f64 F F #s(literal 2 binary64))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 F F))
(*.f64 (pow.f64 F #s(literal 1 binary64)) (pow.f64 F #s(literal 1 binary64)))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 F F)
(pow.f64 F #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(*.f64 x #s(literal 2 binary64))
(+.f64 x x)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64))) F))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 3/8 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -7 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal -5/16 binary64))) (*.f64 F F) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F))
#s(approx (/ F (sin B)) (/.f64 F (sin.f64 B)))
#s(approx F F)
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 F F)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 3/8 binary64) (*.f64 F F)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (*.f64 F F) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -5/16 binary64) (*.f64 F F)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -7 binary64))) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (*.f64 F F) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)))
#s(approx (+ (* F F) 2) #s(literal 2 binary64))
#s(approx (+ (* F F) 2) (fma.f64 F F #s(literal 2 binary64)))
#s(approx (* F F) (*.f64 F F))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (sin.f64 B)) #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (sin.f64 B)) #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) #s(literal -1/2 binary64) #s(literal 1 binary64)) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64)))) #s(literal 1 binary64)) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64)) F))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 F F))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) #s(literal 1 binary64)) (*.f64 F F)))
#s(approx (+ (* F F) 2) (*.f64 F F))
#s(approx (+ (* F F) 2) (*.f64 (fma.f64 (pow.f64 F #s(literal -2 binary64)) #s(literal 2 binary64) #s(literal 1 binary64)) (*.f64 F F)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (*.f64 F F) (sin.f64 B))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (/.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (/.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) #s(literal -1/2 binary64) #s(literal 1 binary64)) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64)))) #s(literal 1 binary64)) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) (*.f64 F F)) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64)) F)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 (fma.f64 x #s(literal 1/45 binary64) (neg.f64 (*.f64 (*.f64 F #s(literal -7/360 binary64)) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x))) (*.f64 B B) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 F #s(literal -7/360 binary64)) (fma.f64 x #s(literal 1/45 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 (*.f64 F #s(literal -7/360 binary64)) #s(literal 1/6 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64)))) #s(literal -1 binary64) (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64)))) (*.f64 B B)))) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x))) (*.f64 B B) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (neg.f64 (/.f64 x B)))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 B B) x) #s(literal 1/3 binary64)) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 x #s(literal 1/45 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (fma.f64 (fma.f64 x #s(literal 1/45 binary64) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) (*.f64 B B))) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (fma.f64 (*.f64 (*.f64 B B) x) #s(literal -1/3 binary64) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 x #s(literal 1/45 binary64)) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) (*.f64 B B))) (*.f64 x #s(literal 1/45 binary64))) (*.f64 B B) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ 1 (tan B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ 1 (tan B)) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) B)
#s(approx (tan B) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 B B) #s(literal 2/15 binary64)) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx B B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 B B) F) #s(literal 1/6 binary64)) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 F #s(literal -7/360 binary64)) (*.f64 B B)) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 B B) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 F #s(literal -7/360 binary64)) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 (*.f64 F #s(literal -7/360 binary64)) #s(literal 1/6 binary64)))) (*.f64 B B)) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 B B) (*.f64 (*.f64 #s(literal 1/6 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 B B) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (/ F (sin B)) (/.f64 F B))
#s(approx (/ F (sin B)) (/.f64 (fma.f64 (*.f64 (*.f64 B B) F) #s(literal 1/6 binary64) F) B))
#s(approx (/ F (sin B)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 F #s(literal -7/360 binary64)) (*.f64 #s(literal 1/6 binary64) F)) (*.f64 B B) F) B))
#s(approx (/ F (sin B)) (/.f64 (fma.f64 (fma.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 (*.f64 F #s(literal -7/360 binary64)) #s(literal 1/6 binary64)))) (*.f64 B B))) (*.f64 F #s(literal -7/360 binary64))) (*.f64 B B) (*.f64 #s(literal 1/6 binary64) F)) (*.f64 B B) F) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 B B) #s(literal 1/120 binary64)) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (neg (* x (/ 1 (tan B)))) (neg.f64 (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (* x (/ 1 (tan B))) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
#s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (tan B) (tan.f64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x (*.f64 F F)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (sin B) (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 (-.f64 (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B)))) (/.f64 (cos.f64 B) (sin.f64 B))) x (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 (-.f64 (fma.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 F (/.f64 x (sin.f64 B)))) #s(literal 3/2 binary64) (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) (/.f64 (cos.f64 B) (sin.f64 B))) x (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -7 binary64))) (*.f64 F (/.f64 x (sin.f64 B)))) #s(literal -5/2 binary64))) x (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) (/.f64 (cos.f64 B) (sin.f64 B))) x (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx x x)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)) (neg.f64 (*.f64 (*.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (fma.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 F (/.f64 x (sin.f64 B)))) #s(literal 3/2 binary64) (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -7 binary64))) (*.f64 F (/.f64 x (sin.f64 B)))) #s(literal -5/2 binary64))) x (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1 binary64) x) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -5 binary64))) (neg.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))))) x (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -7 binary64))) (*.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/2 binary64))) x (neg.f64 (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -3 binary64))))) x (sqrt.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (fma.f64 F F #s(literal 2 binary64)))
#s(approx (* 2 x) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (fma.f64 (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))) #s(literal -1/8 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (-.f64 (fma.f64 (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))) #s(literal 1/16 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (*.f64 (*.f64 (/.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (*.f64 (/.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal 1/16 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) x) #s(literal 1/2 binary64)) #s(literal 1/64 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64)))) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (*.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) F) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal 1/16 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (fma.f64 F F #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (fma.f64 F F #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) x) #s(literal 1/2 binary64)) #s(literal 1/64 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (fma.f64 F F #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 (+.f64 (/.f64 (fma.f64 F F #s(literal 2 binary64)) x) #s(literal 2 binary64)) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) x) #s(literal -1/2 binary64)) #s(literal -1/64 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 x)) (*.f64 (sqrt.f64 #s(literal -1/2 binary64)) (sin.f64 B))) #s(literal -1/16 binary64))) (pow.f64 x #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (fma.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64)) x) #s(literal -1/2 binary64)) #s(literal -1/64 binary64) (*.f64 #s(literal 1/16 binary64) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))) (pow.f64 x #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 F F #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 F F #s(literal 2 binary64)) x)) #s(literal 2 binary64)) x)))

eval29.0ms (0.2%)

Memory
0.5MiB live, 47.2MiB allocated; 2ms collecting garbage
Compiler

Compiled 9 119 to 1 082 computations (88.1% saved)

prune211.0ms (1.2%)

Memory
-52.6MiB live, 261.2MiB allocated; 33ms collecting garbage
Pruning

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New1988206
Fresh000
Picked101
Done000
Total1998207
Accuracy
99.9%
Counts
207 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.5%
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
78.4%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
78.2%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
49.4%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
78.4%
(+.f64 (neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
57.1%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
48.6%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
58.8%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
Compiler

Compiled 700 to 422 computations (39.7% saved)

series109.0ms (0.6%)

Memory
14.7MiB live, 201.6MiB allocated; 14ms collecting garbage
Counts
50 → 402
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
(*.f64 F F)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
(*.f64 (cos.f64 B) x)
(cos.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))
(-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))
(pow.f64 F #s(literal -1 binary64))
#s(literal -1 binary64)
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
(fma.f64 F F #s(literal 2 binary64))
#s(literal -1/2 binary64)
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
Outputs
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F (sin B))))
#s(approx F #s(hole binary64 F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* F F) 2) #s(hole binary64 2))
#s(approx (+ (* F F) 2) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (pow F -1) #s(hole binary64 (/ 1 F)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* (pow F 2) (- (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (* 2 x))))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* (pow F 2) (- (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x)))))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* (pow F 2) (- (* (pow F 2) (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 3)))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x)))))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (* 2 x))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* (pow F 2) (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2)))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* (pow F 2) (+ (* (pow F 2) (- (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 3))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* (pow F 2) (+ (* (pow F 2) (- (* (pow F 2) (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 4)))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 3))))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* -1 (/ (* x (cos B)) (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* 1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* (pow F 2) (- (* -3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ 1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* F F) 2) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) 2) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (+ (/ 2 (* (pow F 2) (pow (sin B) 2))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))) (/ 1 (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (+ (/ 2 (* (pow F 2) (pow (sin B) 2))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))) (/ 1 (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (+ (/ 2 (* (pow F 2) (pow (sin B) 2))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 6)))))) (/ 1 (pow (sin B) 2)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (+ (* 2 (/ 1 (pow (sin B) 2))) (* 2 (/ x (pow (sin B) 2)))) (pow F 2))) (/ 1 (pow (sin B) 2)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (/ 1 (pow (sin B) 2)) (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (/ 2 (* (pow F 2) (pow (sin B) 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 6))) (/ 1 (pow (sin B) 2))) (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (/ 2 (* (pow F 2) (pow (sin B) 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ 1 F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B))))) (/ 1 (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B))))) (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ -1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ -1 F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* 1/6 (* (pow B 2) F))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (* -1/6 x) (+ 1/6 (* -1/2 x)))) (+ 1 x)) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1/6 x) (* (pow B 2) (- (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)) (+ 7/360 (* 1/24 x))))) (+ 1/6 (* -1/2 x)))) (+ 1 x)) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1/6 x) (* (pow B 2) (- (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (+ (* 1/120 x) (* (pow B 2) (- (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))) (+ 31/15120 (* -1/720 x)))))) (+ 7/360 (* 1/24 x))))) (+ 1/6 (* -1/2 x)))) (+ 1 x)) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 x) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (+ x (* (pow B 2) (- (* -1/2 x) (* -1/6 (+ 1 x)))))) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 (+ 1 x)))) (* 1/120 (+ 1 x)))))) (* -1/6 (+ 1 x)))))) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (+ (* 1/24 x) (* (pow B 2) (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 (+ 1 x)))) (* 1/120 (+ 1 x))))) (+ (* -1/5040 (+ 1 x)) (* 1/120 (- (* -1/2 x) (* -1/6 (+ 1 x))))))))) (+ (* -1/6 (- (* -1/2 x) (* -1/6 (+ 1 x)))) (* 1/120 (+ 1 x)))))) (* -1/6 (+ 1 x)))))) B)))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 x)))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (+ x (* -1/2 (* (pow B 2) x))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x))))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x)))))))))
#s(approx (* (cos B) x) #s(hole binary64 x))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (* 1/2 x) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (+ (* -1/24 x) (* (pow B 2) (- (* 1/720 x) (+ (* -1/6 (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x))))) (+ (* -1/5040 (- 1 x)) (* 1/120 (- (* 1/2 x) (* -1/6 (- 1 x))))))))) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- 1 x)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- (+ 1 (* 1/2 (* (pow B 2) x))) x)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- (+ 1 (* (pow B 2) (- (* -1/24 (* (pow B 2) x)) (* -1/2 x)))) x)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* 1/720 (* (pow B 2) x)) (* 1/24 x))) (* -1/2 x)))) x)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* B (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/315 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/135 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 1/3 (/ (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -2/3 (/ (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -34/135 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 62/315 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))))) (* 2/3 (pow x 2)))) (pow x 2)) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* (pow B 2) (- (+ (* -1/315 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* 2/135 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 1/3 (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))))) (* 2/3 (pow x 2)))) (pow x 2)) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (pow x 2) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (+ (* -2/3 (* (pow B 2) (pow x 2))) (pow x 2)) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* 1/3 (* (pow B 2) x))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow B 2) (+ 2 (+ (* 2 x) (pow F 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* 1/3 (/ (* (pow B 2) (pow F 2)) (+ 2 (+ (* 2 x) (pow F 2))))) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))))) (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/315 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* 2/135 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 1/3 (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))))) (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))))))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (* x (cos B))) (sin B))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (* x (cos B)))))
#s(approx (* (cos B) x) #s(hole binary64 (* x (cos B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 (* x (cos B))) (sin B))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- 1 (* x (cos B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* x 1) #s(hole binary64 x))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 1))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 1))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (+ 1 (* -1 (* x (cos B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (+ (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (* x (- (* -8 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -5/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (/ (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (pow (+ 2 (pow F 2)) 2)))))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (* 2 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (* x (+ (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (* x (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (* x (+ (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (* x (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (+ (* 8 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 4)))) (/ (pow (cos B) 2) (pow (sin B) 2))))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -2 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* x (- (* 4 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* x (- (* x (- (* -8 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 4)))) (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))))) (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* x (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* x (- (+ (* -3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* -1 (/ (cos B) (sin B)))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* x (- (+ (* -1 (/ (cos B) (sin B))) (* x (- (* 5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (* x (cos B))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (* x (+ (cos B) (/ 1 x)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (* -1 (* x (cos B)))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (* x (- (/ 1 x) (cos B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (+ (* -1 (/ (- (* -1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt x))) (* (/ (* (pow F 3) (pow (sqrt 1/2) 3)) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3)))))) (pow x 3))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (+ (* -1/2 (/ (pow F 2) (* (pow x 3) (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (- (+ (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* (pow x 4) (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2))) (* 1/2 (/ (pow F 2) (* (pow x 3) (pow (sin B) 2))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (- (+ (* -1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* (pow x 5) (pow (sin B) 2)))) (+ (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* (pow x 4) (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (* (pow x 3) (pow (sin B) 2))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* 1/2 (/ (pow F 2) (* x (pow (sin B) 2))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (pow (sin B) 2)))) x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* (pow x 2) (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2))))) x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 3)) (* (pow x 3) (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (pow (sin B) 2)))) (+ (* -1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* (pow x 2) (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2)))))) x)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* x (- (* -1 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* x (- (* 1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* x (- (* -1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (* x (- (/ 1 (* x (sin B))) (* -1 (/ (cos B) (sin B))))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (* -1 (* x (- (* -1 (cos B)) (/ 1 x))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (* x (+ (* -1 (cos B)) (/ 1 x)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* (pow x 2) (* (cos B) (sin B)))) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1 (* (/ (* (pow F 3) (* (sqrt -1) (pow (sqrt -1/2) 3))) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3))))) (* 1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt x))))) x)) (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* x (* (cos B) (sin B))))) x)) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2)))) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) (pow x 3))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* x (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (pow (sin B) 2)))) x)) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) (pow x 3))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow F 2) (pow (sin B) 2))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2))))) x))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* x (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (pow (sin B) 2)))) x)) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) x))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/16 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 3)) (* x (pow (sin B) 2)))) (* 1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (pow (sin B) 2)))) x)) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (pow (sin B) 2)))) x)) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) x))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* x (+ (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* 1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
Calls

9 calls:

TimeVariablePointExpression
16.0ms
B
@0
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/ (+ 1 (* (cos B) x)) (sin B)) (+ 1 (* (cos B) x)) (* (cos B) x) (cos B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (- 1 (* (cos B) x)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow F -1) -1 (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (neg x) (pow (tan B) -1)) (neg x) (pow (tan B) -1) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+ (* 2 x) (+ (* F F) 2)) (+ (* F F) 2) -1/2 (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))))
16.0ms
B
@inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/ (+ 1 (* (cos B) x)) (sin B)) (+ 1 (* (cos B) x)) (* (cos B) x) (cos B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (- 1 (* (cos B) x)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow F -1) -1 (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (neg x) (pow (tan B) -1)) (neg x) (pow (tan B) -1) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+ (* 2 x) (+ (* F F) 2)) (+ (* F F) 2) -1/2 (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))))
11.0ms
x
@inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/ (+ 1 (* (cos B) x)) (sin B)) (+ 1 (* (cos B) x)) (* (cos B) x) (cos B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (- 1 (* (cos B) x)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow F -1) -1 (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (neg x) (pow (tan B) -1)) (neg x) (pow (tan B) -1) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+ (* 2 x) (+ (* F F) 2)) (+ (* F F) 2) -1/2 (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))))
8.0ms
x
@-inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/ (+ 1 (* (cos B) x)) (sin B)) (+ 1 (* (cos B) x)) (* (cos B) x) (cos B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (- 1 (* (cos B) x)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow F -1) -1 (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (neg x) (pow (tan B) -1)) (neg x) (pow (tan B) -1) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+ (* 2 x) (+ (* F F) 2)) (+ (* F F) 2) -1/2 (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))))
8.0ms
F
@inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) F (sin B) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (+ (* F F) 2) (* F F) 2 (* 2 x) (neg (/ 1 2)) (/ 1 2) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/ (+ 1 (* (cos B) x)) (sin B)) (+ 1 (* (cos B) x)) (* (cos B) x) (cos B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (- 1 (* (cos B) x)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow F -1) -1 (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (neg x) (pow (tan B) -1)) (neg x) (pow (tan B) -1) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+ (* 2 x) (+ (* F F) 2)) (+ (* F F) 2) -1/2 (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))))

rewrite276.0ms (1.5%)

Memory
35.9MiB live, 409.4MiB allocated; 72ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0198128052
0206525871
0830925007
Stop Event
iter limit
node limit
iter limit
Counts
452 → 512
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
(*.f64 F F)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
(*.f64 (cos.f64 B) x)
(cos.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))
(-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))
(pow.f64 F #s(literal -1 binary64))
#s(literal -1 binary64)
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
(fma.f64 F F #s(literal 2 binary64))
#s(literal -1/2 binary64)
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F (sin B))))
#s(approx F #s(hole binary64 F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* F F) 2) #s(hole binary64 2))
#s(approx (+ (* F F) 2) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (pow F -1) #s(hole binary64 (/ 1 F)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* (pow F 2) (- (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (* 2 x))))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* (pow F 2) (- (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x)))))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* (pow F 2) (- (* (pow F 2) (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 3)))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x)))))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (* 2 x))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* (pow F 2) (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2)))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* (pow F 2) (+ (* (pow F 2) (- (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 3))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* (pow F 2) (+ (* (pow F 2) (- (* (pow F 2) (+ (* -1 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 4)))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 3))))) (/ 1 (* (pow (sin B) 2) (pow (+ 2 (* 2 x)) 2))))) (/ 1 (* (pow (sin B) 2) (+ 2 (* 2 x))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* -1 (/ (* x (cos B)) (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* 1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* (pow F 2) (- (* -3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ 1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* F F) 2) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) 2) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (+ (/ 2 (* (pow F 2) (pow (sin B) 2))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)))) (/ 1 (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (+ (/ 2 (* (pow F 2) (pow (sin B) 2))) (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))) (/ 1 (pow (sin B) 2)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (+ (/ 2 (* (pow F 2) (pow (sin B) 2))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 6)))))) (/ 1 (pow (sin B) 2)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (+ (* 2 (/ 1 (pow (sin B) 2))) (* 2 (/ x (pow (sin B) 2)))) (pow F 2))) (/ 1 (pow (sin B) 2)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (/ 1 (pow (sin B) 2)) (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (/ 2 (* (pow F 2) (pow (sin B) 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 6))) (/ 1 (pow (sin B) 2))) (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (pow F 4))) (+ (* 2 (/ x (* (pow F 2) (pow (sin B) 2)))) (/ 2 (* (pow F 2) (pow (sin B) 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ 1 F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B))))) (/ 1 (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B))))) (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (/ -1 F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (/ -1 F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (+ (* -1 (/ (* x (cos B)) (sin B))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* 1/6 (* (pow B 2) F))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (* -1/6 x) (+ 1/6 (* -1/2 x)))) (+ 1 x)) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1/6 x) (* (pow B 2) (- (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)) (+ 7/360 (* 1/24 x))))) (+ 1/6 (* -1/2 x)))) (+ 1 x)) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1/6 x) (* (pow B 2) (- (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (+ (* 1/120 x) (* (pow B 2) (- (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))) (+ 31/15120 (* -1/720 x)))))) (+ 7/360 (* 1/24 x))))) (+ 1/6 (* -1/2 x)))) (+ 1 x)) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 x) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (+ x (* (pow B 2) (- (* -1/2 x) (* -1/6 (+ 1 x)))))) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 (+ 1 x)))) (* 1/120 (+ 1 x)))))) (* -1/6 (+ 1 x)))))) B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (+ (* 1/24 x) (* (pow B 2) (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 (+ 1 x)))) (* 1/120 (+ 1 x))))) (+ (* -1/5040 (+ 1 x)) (* 1/120 (- (* -1/2 x) (* -1/6 (+ 1 x))))))))) (+ (* -1/6 (- (* -1/2 x) (* -1/6 (+ 1 x)))) (* 1/120 (+ 1 x)))))) (* -1/6 (+ 1 x)))))) B)))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 x)))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (+ x (* -1/2 (* (pow B 2) x))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x))))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x)))))))))
#s(approx (* (cos B) x) #s(hole binary64 x))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (* 1/2 x) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (+ (* -1/24 x) (* (pow B 2) (- (* 1/720 x) (+ (* -1/6 (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x))))) (+ (* -1/5040 (- 1 x)) (* 1/120 (- (* 1/2 x) (* -1/6 (- 1 x))))))))) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- 1 x)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- (+ 1 (* 1/2 (* (pow B 2) x))) x)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- (+ 1 (* (pow B 2) (- (* -1/24 (* (pow B 2) x)) (* -1/2 x)))) x)))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* 1/720 (* (pow B 2) x)) (* 1/24 x))) (* -1/2 x)))) x)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* B (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/315 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/135 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 1/3 (/ (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -2/3 (/ (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -34/135 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 62/315 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))))) (* 2/3 (pow x 2)))) (pow x 2)) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* (pow B 2) (- (+ (* -1/315 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* 2/135 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 1/3 (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))))) (* 2/3 (pow x 2)))) (pow x 2)) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (pow x 2) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (+ (* -2/3 (* (pow B 2) (pow x 2))) (pow x 2)) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* 1/3 (* (pow B 2) x))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow B 2) (+ 2 (+ (* 2 x) (pow F 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* 1/3 (/ (* (pow B 2) (pow F 2)) (+ 2 (+ (* 2 x) (pow F 2))))) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))))) (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/315 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* 2/135 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 1/3 (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))))) (* -1/3 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))))) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (pow B 2))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))))))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (+ 1 (* x (cos B))) (sin B))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (+ 1 (* x (cos B)))))
#s(approx (* (cos B) x) #s(hole binary64 (* x (cos B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 (* x (cos B))) (sin B))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (- 1 (* x (cos B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* x 1) #s(hole binary64 x))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 1))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 1))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (+ 1 (* -1 (* x (cos B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (+ (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (* x (- (* -8 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -5/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (/ (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (pow (+ 2 (pow F 2)) 2)))))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (* 2 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (* x (+ (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (* x (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (* x (+ (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (* x (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (+ (* 8 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 4)))) (/ (pow (cos B) 2) (pow (sin B) 2))))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* -2 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* x (- (* 4 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (+ (* x (- (* x (- (* -8 (/ (* (pow F 2) x) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 4)))) (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))))) (* 2 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 2)))))) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (pow F 2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* x (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* x (- (+ (* -3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* -1 (/ (cos B) (sin B)))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (- (* x (- (+ (* -1 (/ (cos B) (sin B))) (* x (- (* 5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (* x (cos B))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (* x (+ (cos B) (/ 1 x)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (* -1 (* x (cos B)))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (* x (- (/ 1 x) (cos B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (+ (* -1 (/ (- (* -1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt x))) (* (/ (* (pow F 3) (pow (sqrt 1/2) 3)) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3)))))) (pow x 3))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (+ (* -1/2 (/ (pow F 2) (* (pow x 3) (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (- (+ (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* (pow x 4) (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2))) (* 1/2 (/ (pow F 2) (* (pow x 3) (pow (sin B) 2))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (- (+ (* -1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* (pow x 5) (pow (sin B) 2)))) (+ (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* (pow x 4) (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (* (pow x 3) (pow (sin B) 2))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* 1/2 (/ (pow F 2) (* x (pow (sin B) 2))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (pow (sin B) 2)))) x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* (pow x 2) (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2))))) x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 3)) (* (pow x 3) (pow (sin B) 2)))) (* 1/2 (/ (pow F 2) (pow (sin B) 2)))) (+ (* -1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* (pow x 2) (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2)))))) x)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* x (- (* -1 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* x (- (* 1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* x (- (* -1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) #s(hole binary64 (* -1 (* x (- (/ 1 (* x (sin B))) (* -1 (/ (cos B) (sin B))))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))))
#s(approx (+ 1 (* (cos B) x)) #s(hole binary64 (* -1 (* x (- (* -1 (cos B)) (/ 1 x))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (- 1 (* (cos B) x)) #s(hole binary64 (* x (+ (* -1 (cos B)) (/ 1 x)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* (pow x 2) (* (cos B) (sin B)))) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1 (* (/ (* (pow F 3) (* (sqrt -1) (pow (sqrt -1/2) 3))) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3))))) (* 1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt x))))) x)) (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* x (* (cos B) (sin B))))) x)) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2)))) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) (pow x 3))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* x (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (pow (sin B) 2)))) x)) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) (pow x 3))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow F 2) (pow (sin B) 2))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (* x (pow (sin B) 2))))) x))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (* x (pow (sin B) 2)))) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (pow (sin B) 2)))) x)) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) x))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/16 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 3)) (* x (pow (sin B) 2)))) (* 1/8 (/ (* (pow F 2) (pow (+ 2 (pow F 2)) 2)) (pow (sin B) 2)))) x)) (* 1/4 (/ (* (pow F 2) (+ 2 (pow F 2))) (pow (sin B) 2)))) x)) (* -1/2 (/ (pow F 2) (pow (sin B) 2)))) x))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* x (+ (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* 1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
Outputs
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))) (-.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (-.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))))))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (neg.f64 (*.f64 x #s(literal 1 binary64))) (neg.f64 (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 F) (neg.f64 (sin.f64 B)))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(pow.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) (fma.f64 F F #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x))) (-.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))
(/.f64 (+.f64 (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 3 binary64))) (fma.f64 (fma.f64 F F #s(literal 2 binary64)) (fma.f64 F F #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x)) (*.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(+.f64 (fma.f64 F F #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))
(/.f64 (-.f64 (*.f64 (*.f64 F F) (*.f64 F F)) #s(literal 4 binary64)) (-.f64 (*.f64 F F) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 F F) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (*.f64 F F) (*.f64 F F) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 F) (neg.f64 F) #s(literal 2 binary64))
(fma.f64 (fabs.f64 F) (fabs.f64 F) #s(literal 2 binary64))
(fma.f64 F F #s(literal 2 binary64))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 F F)
(pow.f64 F #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))) (neg.f64 (sin.f64 B)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))
(+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x))) (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
(*.f64 (cos.f64 B) x)
(sin.f64 (+.f64 B (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 B))
(cos.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))) (neg.f64 (sin.f64 B)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))
(-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))
(-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64))))) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))) (-.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64))))) (*.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64))))))))
(+.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
(neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))
(pow.f64 F #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 F))
(/.f64 #s(literal 1 binary64) F)
(exp.f64 (*.f64 (log.f64 F) #s(literal -1 binary64)))
#s(literal -1 binary64)
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (neg.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))))
(*.f64 (fabs.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (fabs.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))))
(*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(*.f64 (neg.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))) (neg.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(*.f64 (fabs.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))) (fabs.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64))
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x)) (*.f64 (fma.f64 F F #s(literal 2 binary64)) (fma.f64 F F #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 2 binary64) x) (fma.f64 F F #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 3 binary64)) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x) (-.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) (fma.f64 F F #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) x) (fma.f64 F F #s(literal 2 binary64))))))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) x) (fma.f64 F F #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 F F) (*.f64 F F)) #s(literal 4 binary64)) (-.f64 (*.f64 F F) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 F F) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (*.f64 F F) (*.f64 F F) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 F) (neg.f64 F) #s(literal 2 binary64))
(fma.f64 (fabs.f64 F) (fabs.f64 F) #s(literal 2 binary64))
(fma.f64 F F #s(literal 2 binary64))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
#s(literal -1/2 binary64)
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))))
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))))
#s(approx (/ F (sin B)) (/.f64 F (sin.f64 B)))
#s(approx F F)
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))
#s(approx (+ (* F F) 2) #s(literal 2 binary64))
#s(approx (+ (* F F) 2) (+.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (* F F) (*.f64 F F))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (pow F -1) (pow.f64 F #s(literal -1 binary64)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 F (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 F (-.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 (*.f64 F F) (-.f64 (/.f64 (*.f64 F F) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -1 binary64))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 (*.f64 F F) (-.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)))) (pow.f64 (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -1 binary64))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 F F) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -1 binary64)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 (*.f64 F F) (fma.f64 (*.f64 F F) (-.f64 (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)))) (pow.f64 (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -1 binary64)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 (*.f64 F F) (fma.f64 (*.f64 F F) (-.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 4 binary64)))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) #s(literal -1 binary64)))) (pow.f64 (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -1 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 F (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 F (-.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))))) F))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 F F))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 (*.f64 F F) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 F F)) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64)))))))
#s(approx (+ (* F F) 2) (*.f64 F F))
#s(approx (+ (* F F) 2) (*.f64 (*.f64 F F) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (pow.f64 F #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (pow.f64 F #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (pow.f64 F #s(literal 6 binary64))))))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (*.f64 F F)) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (+.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (pow.f64 F #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (pow.f64 F #s(literal 6 binary64))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (pow.f64 F #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (pow.f64 (*.f64 F (sin.f64 B)) #s(literal 2 binary64)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (pow.f64 F #s(literal -1 binary64)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))) F))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) F))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))))) F))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 F F))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 (*.f64 F F) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 F F)) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64)))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))))) F)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))))) F)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x))))) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 x B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (+.f64 x (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (tan B) B)
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 B B)))))
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 B B)))))))
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 B B)))))))))
#s(approx B B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))))) B))
#s(approx (/ F (sin B)) (/.f64 F B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 F (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) F))) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 F (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))) (*.f64 #s(literal -1/6 binary64) F)))) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 F (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))) (*.f64 #s(literal -1/6 binary64) F)))) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 B B)))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 B B)))) #s(literal 1/6 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/6 binary64) x) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) x)))) (+.f64 #s(literal 1 binary64) x)) B))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 1/24 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) x)))) (+.f64 #s(literal 1 binary64) x)) B))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (fma.f64 #s(literal 1/120 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))) (+.f64 #s(literal 31/15120 binary64) (*.f64 #s(literal -1/720 binary64) x)))))) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 1/24 binary64) x))))) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) x)))) (+.f64 #s(literal 1 binary64) x)) B))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x)))))) B))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 1 binary64) x)))))) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x)))))) B))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/24 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 1 binary64) x)))) (fma.f64 #s(literal -1/5040 binary64) (+.f64 #s(literal 1 binary64) x) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x))))))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 1 binary64) x)))))) (*.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 1 binary64) x)))))) B))
#s(approx (+ 1 (* (cos B) x)) (+.f64 #s(literal 1 binary64) x))
#s(approx (+ 1 (* (cos B) x)) (+.f64 #s(literal 1 binary64) (+.f64 x (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 B B) x)))))
#s(approx (+ 1 (* (cos B) x)) (+.f64 #s(literal 1 binary64) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 B B) x)))))))
#s(approx (+ 1 (* (cos B) x)) (+.f64 #s(literal 1 binary64) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/24 binary64) x))))))))
#s(approx (* (cos B) x) x)
#s(approx (* (cos B) x) (+.f64 x (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 B B) x))))
#s(approx (* (cos B) x) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 B B) x))))))
#s(approx (* (cos B) x) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/24 binary64) x)))))))
#s(approx (cos B) #s(literal 1 binary64))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 B B))))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 B B)) #s(literal 1/2 binary64)))))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 B B)))) #s(literal 1/2 binary64)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1 binary64) x)))))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/24 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1 binary64) x)))) (fma.f64 #s(literal -1/5040 binary64) (-.f64 #s(literal 1 binary64) x) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1 binary64) x)))))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))) x) B))
#s(approx (- 1 (* (cos B) x)) (-.f64 #s(literal 1 binary64) x))
#s(approx (- 1 (* (cos B) x)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 B B) x))) x))
#s(approx (- 1 (* (cos B) x)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 B B) x)) (*.f64 #s(literal -1/2 binary64) x)))) x))
#s(approx (- 1 (* (cos B) x)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 B B) x)) (*.f64 #s(literal 1/24 binary64) x))) (*.f64 #s(literal -1/2 binary64) x)))) x))
#s(approx (neg (* x (/ 1 (tan B)))) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x)) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x))))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 x (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (pow (tan B) -1) (pow.f64 B #s(literal -1 binary64)))
#s(approx (pow (tan B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (pow (tan B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (pow (tan B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -4/9 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 17/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (fma.f64 #s(literal 2/135 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -2/3 binary64) (/.f64 (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -34/135 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 62/315 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -4/9 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 17/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -4/9 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 17/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (fma.f64 #s(literal 2/135 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))))))) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))) (fma.f64 #s(literal -34/135 binary64) (*.f64 x x) (*.f64 #s(literal 62/315 binary64) (*.f64 x x)))))))) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (/.f64 (*.f64 x x) (*.f64 B B)))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (/.f64 (fma.f64 #s(literal -2/3 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))) (fma.f64 #s(literal -34/135 binary64) (*.f64 x x) (*.f64 #s(literal 62/315 binary64) (*.f64 x x)))))) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (neg x) (pow (tan B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (* (neg x) (pow (tan B) -1)) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (* (neg x) (pow (tan B) -1)) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))) B))
#s(approx (* (neg x) (pow (tan B) -1)) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x)))))))))) B))
#s(approx (pow (tan B) -1) (pow.f64 B #s(literal -1 binary64)))
#s(approx (pow (tan B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (pow (tan B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (pow (tan B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (*.f64 F F) (*.f64 (*.f64 B B) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 B F) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))))) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (fma.f64 #s(literal 2/135 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))))))))) (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))))) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B B)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))))) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (* x 1) (tan B)) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (tan B) (tan.f64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (sin B) (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ 1 (* (cos B) x)) (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))))
#s(approx (* (cos B) x) (*.f64 x (cos.f64 B)))
#s(approx (cos B) (cos.f64 B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (- 1 (* (cos B) x)) (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))))
#s(approx (neg (* x (/ 1 (tan B)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* x (/ 1 (tan B))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (pow (tan B) -1) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))))
#s(approx (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (* (neg x) (pow (tan B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (pow (tan B) -1) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* x 1) x)
#s(approx x x)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 x (fma.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))) (*.f64 #s(literal 3/2 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 x (fma.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (* 2 x) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ 1 (* (cos B) x)) #s(literal 1 binary64))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (- 1 (* (cos B) x)) #s(literal 1 binary64))
#s(approx (- 1 (* (cos B) x)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 x (cos.f64 B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 x (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 x (-.f64 (*.f64 #s(literal -8 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64))))) (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 F F) x) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (*.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 F F) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64))) (*.f64 x (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (*.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 F F) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64))) (*.f64 x (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 F F) x) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (neg x) (*.f64 #s(literal -1 binary64) x))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F)))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 F F) x) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 x (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 F F) x) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 F F) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64))))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (fma.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 F F) x) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 4 binary64))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 F F) (pow.f64 (*.f64 (sin.f64 B) (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64))))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 x (fma.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))) (*.f64 #s(literal 3/2 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 x (fma.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (+.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 x (-.f64 (*.f64 #s(literal 5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64))))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 x (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)) (/.f64 (*.f64 F F) x)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ 1 (* (cos B) x)) (*.f64 x (cos.f64 B)))
#s(approx (+ 1 (* (cos B) x)) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (- 1 (* (cos B) x)) (*.f64 #s(literal -1 binary64) (*.f64 x (cos.f64 B))))
#s(approx (- 1 (* (cos B) x)) (*.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) (cos.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 F F) #s(literal 1/2 binary64)) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 F F) #s(literal 1/2 binary64)) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 x)) (*.f64 (/.f64 (pow.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 F F) (pow.f64 x #s(literal 4 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)) (*.f64 (pow.f64 x #s(literal 5 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 F F) (pow.f64 x #s(literal 4 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))) x))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 F F) (pow.f64 x #s(literal 3 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))) x))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 x (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)) (/.f64 (*.f64 F F) x)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 x (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (fma.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 x (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 x)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 x) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) x)) #s(literal 2 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (/ (+ 1 (* (cos B) x)) (sin B)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ 1 (* (cos B) x)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (- 1 (* (cos B) x)) (*.f64 x (fma.f64 #s(literal -1 binary64) (cos.f64 B) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 F F) #s(literal -1/2 binary64)) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 F #s(literal 3 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3/2 binary64))) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 x))))) x)) (*.f64 (/.f64 (*.f64 F F) x) (/.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 B) (sin.f64 B))))) x)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))
#s(approx (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))) x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x)))
#s(approx (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) x)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 x)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 x) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) x)) #s(literal 2 binary64)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))

eval131.0ms (0.7%)

Memory
-15.9MiB live, 214.6MiB allocated; 31ms collecting garbage
Compiler

Compiled 68 099 to 3 573 computations (94.8% saved)

prune1.3s (7.3%)

Memory
29.3MiB live, 1 975.5MiB allocated; 130ms collecting garbage
Pruning

10 alts after pruning (6 fresh and 4 done)

PrunedKeptTotal
New8335838
Fresh213
Picked145
Done000
Total83610846
Accuracy
100.0%
Counts
846 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.5%
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
48.6%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
78.2%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
49.4%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
27.6%
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
20.6%
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
57.1%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
34.2%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
58.8%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
53.0%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Compiler

Compiled 1 266 to 558 computations (55.9% saved)

series319.0ms (1.8%)

Memory
2.4MiB live, 432.2MiB allocated; 103ms collecting garbage
Counts
71 → 639
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
x
(/.f64 #s(literal 1 binary64) (tan.f64 B))
#s(literal 1 binary64)
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
#s(literal 2 binary64)
(fma.f64 F F #s(literal 2 binary64))
#s(literal -1/4 binary64)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
(*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(literal -1 binary64)
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
(pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))
(*.f64 x (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
(neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B)))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))
(*.f64 (cos.f64 B) x)
#s(literal 3 binary64)
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))
(-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))
(*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(*.f64 F F)
(*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (sin.f64 B) #s(literal 2 binary64))
(-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
(/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))
(*.f64 x (cos.f64 B))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F (sin B))))
#s(approx F #s(hole binary64 F))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (pow (/ 1 (+ 2 (* 2 x))) 1/4)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (pow (/ 1 (pow (+ 2 (* 2 x)) 5)) 1/4) (pow F 2))) (pow (/ 1 (+ 2 (* 2 x))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* (pow F 2) (+ (* -1/4 (pow (/ 1 (pow (+ 2 (* 2 x)) 5)) 1/4)) (* 5/32 (* (pow (/ 1 (pow (+ 2 (* 2 x)) 9)) 1/4) (pow F 2))))) (pow (/ 1 (+ 2 (* 2 x))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* (pow F 2) (+ (* -1/4 (pow (/ 1 (pow (+ 2 (* 2 x)) 5)) 1/4)) (* (pow F 2) (+ (* -15/128 (* (pow (/ 1 (pow (+ 2 (* 2 x)) 13)) 1/4) (pow F 2))) (* 5/32 (pow (/ 1 (pow (+ 2 (* 2 x)) 9)) 1/4)))))) (pow (/ 1 (+ 2 (* 2 x))) 1/4))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* F F) 2) #s(hole binary64 2))
#s(approx (+ (* F F) 2) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* (pow F 2) (- (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (pow F 2))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* (pow F 2) (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (pow F 2))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (pow F 2))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow F 2) (* (pow x 2) (pow (cos B) 2))) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (pow F 2))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow F 2) (* (pow x 2) (pow (cos B) 2))) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (pow F 2))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))) (/ (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (pow F 2))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (/ (+ 2 (* 2 x)) (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ 1 F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (sqrt (/ 1 F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (sqrt (/ 1 F)) (* -1/4 (* (sqrt (/ 1 (pow F 5))) (+ 2 (* 2 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (sqrt (/ 1 F)) (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (+ 2 (* 2 x)))) (* (sqrt (/ 1 (pow F 9))) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (sqrt (/ 1 F)) (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (+ 2 (* 2 x)))) (+ (* (sqrt (/ 1 (pow F 9))) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2)))) (* (sqrt (/ 1 (pow F 13))) (+ (* -1/384 (* (+ 2 (* 2 x)) (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2))))) (+ (* -1/384 (pow (+ 2 (* 2 x)) 3)) (* 1/2880 (+ (* -720 (pow (+ 2 (* 2 x)) 3)) (+ (* -240 (pow (+ 2 (* 2 x)) 3)) (* 720 (pow (+ 2 (* 2 x)) 3)))))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* F F) 2) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) 2) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (+ (* 2 (/ 1 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ -1 F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (* (sqrt (/ 1 F)) (sqrt -1))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (* (sqrt -1) (+ 2 (* 2 x))))) (* (sqrt (/ 1 F)) (sqrt -1)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (* (sqrt -1) (+ 2 (* 2 x))))) (+ (* (sqrt (/ 1 F)) (sqrt -1)) (* (sqrt (/ 1 (pow F 9))) (* (sqrt -1) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2)))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (* (sqrt -1) (+ 2 (* 2 x))))) (+ (* (sqrt (/ 1 F)) (sqrt -1)) (+ (* (sqrt (/ 1 (pow F 9))) (* (sqrt -1) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2))))) (* (sqrt (/ 1 (pow F 13))) (* (sqrt -1) (+ (* -1/384 (* (+ 2 (* 2 x)) (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2))))) (+ (* -1/384 (pow (+ 2 (* 2 x)) 3)) (* 1/2880 (+ (* -720 (pow (+ 2 (* 2 x)) 3)) (+ (* -240 (pow (+ 2 (* 2 x)) 3)) (* 720 (pow (+ 2 (* 2 x)) 3))))))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* 1/6 (* (pow B 2) F))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (* 1/2 x) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (+ (* -1/24 x) (* (pow B 2) (- (* 1/720 x) (+ (* -1/6 (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x))))) (+ (* -1/5040 (- 1 x)) (* 1/120 (- (* 1/2 x) (* -1/6 (- 1 x))))))))) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (* x (- (/ 1 x) 1)) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (* x (+ 1/3 (* 1/6 (/ 1 x)))))) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (* x (+ 1/45 (* 7/360 (/ 1 x)))))))) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (+ (* x (+ 1/45 (* 7/360 (/ 1 x)))) (* (pow B 2) (* x (+ 2/945 (* 31/15120 (/ 1 x)))))))))) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (/ 1 x) 1) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (* 1/6 (/ 1 x)))) (/ 1 x)) 1) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (* 7/360 (/ 1 x))))))) (/ 1 x)) 1) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (+ (* 7/360 (/ 1 x)) (* (pow B 2) (+ 2/945 (* 31/15120 (/ 1 x)))))))))) (/ 1 x)) 1) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ 1 (* B x))))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ (+ (* 1/6 (/ (pow B 2) x)) (/ 1 x)) B)))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 7/360 (/ (pow B 2) x)) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 31/15120 (/ (pow B 2) x)) (* 7/360 (/ 1 x)))) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (* x (sin B)) #s(hole binary64 (* B x)))
#s(approx (* x (sin B)) #s(hole binary64 (* B (+ x (* -1/6 (* (pow B 2) x))))))
#s(approx (* x (sin B)) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* 1/120 (* (pow B 2) x))))))))
#s(approx (* x (sin B)) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* (pow B 2) (+ (* -1/5040 (* (pow B 2) x)) (* 1/120 x)))))))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (/ (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))) B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* (pow B 2) (- (+ (* -1/6 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ 1 (- (+ 1 (pow x 2)) x))) (+ (* 1/3 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x)) (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2))))))) (+ (* 1/24 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x)))))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* (pow B 2) (- (+ (* -1/6 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ 1 (- (+ 1 (pow x 2)) x))) (+ (* 1/3 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* (pow B 2) (- (+ (* -1/6 (/ (- (* 1/3 (pow x 2)) (* 1/24 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* -2/45 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (* 1/24 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* -1/6 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ 1 (- (+ 1 (pow x 2)) x))) (+ (* 1/3 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (/ (* (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x)) (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))))) (- (+ 1 (pow x 2)) x)))))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2)))) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* 1/3 (pow x 2)) (* 1/24 x))) (+ (* -2/45 (pow x 2)) (+ (* -1/5040 (- (+ 1 (pow x 2)) x)) (* 1/120 (- (* -1 (pow x 2)) (* -1/2 x)))))) (* -1/720 x))) (pow (- (+ 1 (pow x 2)) x) 2))))))))) (+ (* -61/240 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/720 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/5040 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x)) (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)))))))) (+ (* 1/24 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x)))))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ 1 (pow x 3)) (* B (- (+ 1 (pow x 2)) x)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (+ (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* -61/240 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* 1/3 (pow x 2)) (* 1/24 x))) (+ (* -2/45 (pow x 2)) (+ (* -1/5040 (- (+ 1 (pow x 2)) x)) (* 1/120 (- (* -1 (pow x 2)) (* -1/2 x)))))) (* -1/720 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (/ (* (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x))))))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (/ (+ 1 (pow x 3)) (- (+ 1 (pow x 2)) x))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ (* (pow B 2) (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (* 1/3 (pow x 2)) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* -1 (pow x 2)) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (+ (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* -61/240 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (* -2/45 (pow x 2)) (* -1/720 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* 1/3 (pow x 2)) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (/ (* (- (* -1 (pow x 2)) (* -1/2 x)) (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (* 1/3 (pow x 2)) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* -1 (pow x 2)) (* -1/2 x))) (- (+ 1 (pow x 2)) x))))) (- (+ 1 (pow x 2)) x))))))) (+ (/ (* (+ 1 (pow x 3)) (- (* 1/3 (pow x 2)) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* -1 (pow x 2)) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (pow x 3))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (* (pow B 2) (pow x 3))) (pow x 3)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* 7/8 (* (pow B 2) (pow x 3))))) (pow x 3)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* (pow B 2) (+ (* -61/240 (* (pow B 2) (pow x 3))) (* 7/8 (pow x 3)))))) (pow x 3)))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (pow x 3)))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (+ (* -3/2 (* (pow B 2) (pow x 3))) (pow x 3))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* 7/8 (* (pow B 2) (pow x 3))))) (pow x 3))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* (pow B 2) (+ (* -61/240 (* (pow B 2) (pow x 3))) (* 7/8 (pow x 3)))))) (pow x 3))))
#s(approx (* (cos B) x) #s(hole binary64 x))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (pow x 2)) x)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (+ (* (pow B 2) (- (* -1 (pow x 2)) (* -1/2 x))) (pow x 2))) x)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (* 1/3 (pow x 2)) (* 1/24 x)))) (* -1/2 x))) (pow x 2))) x)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (+ (* 1/3 (pow x 2)) (* (pow B 2) (- (* -2/45 (pow x 2)) (* -1/720 x)))) (* 1/24 x)))) (* -1/2 x))) (pow x 2))) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (pow x 2) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (+ (* (pow B 2) (- (* -1 (pow x 2)) (* -1/2 x))) (pow x 2)) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (* 1/3 (pow x 2)) (* 1/24 x)))) (* -1/2 x))) (pow x 2)) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (+ (* 1/3 (pow x 2)) (* (pow B 2) (- (* -2/45 (pow x 2)) (* -1/720 x)))) (* 1/24 x)))) (* -1/2 x))) (pow x 2)) x)))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (pow x 2)))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (+ (* -1 (* (pow B 2) (pow x 2))) (pow x 2))))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* 1/3 (* (pow B 2) (pow x 2))))) (pow x 2))))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* (pow B 2) (+ (* -2/45 (* (pow B 2) (pow x 2))) (* 1/3 (pow x 2)))))) (pow x 2))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 x))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* B (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/315 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/135 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 1/3 (/ (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -2/3 (/ (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -34/135 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 62/315 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (/ (pow x 2) (- (* -1 x) 1)))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))))))) (/ (pow x 2) (- (* -1 x) 1))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))))))) (/ (pow x 2) (- (* -1 x) 1))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (+ (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (/ (* x (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2 (- (+ (* 31/15120 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/315 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -2/45 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2)))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2))))))))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))))))) (/ (pow x 2) (- (* -1 x) 1))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (/ (* x (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (+ (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 31/15120 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/315 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))))) B)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ x (* B (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow B 2) (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ x (* (pow F 2) (- (* -1 x) 1)))) B)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (/ x (* (pow F 2) (- (* -1 x) 1)))) B)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* x (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (/ (* x (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (/ x (* (pow F 2) (- (* -1 x) 1)))) B)))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (* (pow F 2) (- (* -1 x) 1)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (+ (* (pow B 2) (* (pow F 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6))) (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)))) (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120))) (* (pow F 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)))) (* (pow F 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)))) (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (* -1 x) 1))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6))) 1))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (+ (* -1/3 (- (* -1 x) 1)) (* (pow B 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)))) 1/6))) 1))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (+ (* -1/3 (- (* -1 x) 1)) (* (pow B 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (+ (* 2/45 (- (* -1 x) 1)) (* (pow B 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120))))) 7/360)))) 1/6))) 1))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow B 2)))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* -1/3 (pow B 2))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* 2/45 (pow B 2)) 1/3))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 2/45 (* -1/315 (pow B 2)))) 1/3))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (* -1 x) 1) B)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) 1) B)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) 1/6))) 1) B)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (* (pow B 2) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) 7/360))) 1/6))) 1) B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (/ (+ (* -1 x) (* -1 (* (pow B 2) (- (* -1/2 x) (* -1/6 x))))) B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* -1 (* (pow B 2) (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))) (* -1 (- (* -1/2 x) (* -1/6 x)))))) B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (+ (* -1 (* (pow B 2) (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))))) (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))))))) B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1/2 x) (* -1/6 x)))) B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))) (* -1/6 x)))) B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (+ (* 1/24 x) (* (pow B 2) (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))))) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))) (* -1/6 x)))) B)))
#s(approx (* x (cos B)) #s(hole binary64 x))
#s(approx (* x (cos B)) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* x (cos B)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* x (cos B)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (* (pow B 2) (- (+ (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 31/15120 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/315 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ 2 (* B (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) B)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2 (/ (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (* 2 (/ (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (* 2 (/ (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) B)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2 (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (* 2 (/ (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (* 2 (/ (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))))) (+ (* -2 (/ (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (* 2 (/ (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (* 2 (/ (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) B)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (pow x 2) (* B (- (* -1 x) 1)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* (pow B 2) (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (* (pow B 2) (- (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (+ (* -1 (* (pow B 2) (pow x 2))) (pow x 2))))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* 1/3 (* (pow B 2) (pow x 2))))) (pow x 2))))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* (pow B 2) (+ (* -2/45 (* (pow B 2) (pow x 2))) (* 1/3 (pow x 2)))))) (pow x 2))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (* 1/2 (- (* -2/45 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2)))))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* B (* (pow F 2) (pow (- (* -1 x) 1) 2))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) B)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* (pow B 2) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) B)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* (pow B 2) (- (+ (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* (pow B 2) (- (* -2/45 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2))))))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (pow x 2) 1) (* B (pow (- (* -1 x) 1) 2)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ 1 (pow (- (* -1 x) 1) 2))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (* 1/3 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ 1 (pow (- (* -1 x) 1) 2))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (* -2/45 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2)) (+ (/ (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2))))))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ 1 (pow (- (* -1 x) 1) 2))) B)))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (pow x 2) 1) (pow B 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (pow x 2)) 1) (pow B 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (* 1/3 (pow x 2)) (+ (* -1/3 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (* 2/45 (- (pow x 2) 1)))))) (* -1/3 (- (pow x 2) 1)))) (pow x 2)) 1) (pow B 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (+ (* 1/3 (pow x 2)) (* (pow B 2) (- (* -2/45 (pow x 2)) (+ (* -1/3 (- (* 1/3 (pow x 2)) (+ (* -1/3 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (* 2/45 (- (pow x 2) 1))))) (+ (* -1/315 (- (pow x 2) 1)) (* 2/45 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1))))))))) (+ (* -1/3 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (* 2/45 (- (pow x 2) 1)))))) (* -1/3 (- (pow x 2) 1)))) (pow x 2)) 1) (pow B 2))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (pow x 2) 1)))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (+ (* -1 (* (pow B 2) (pow x 2))) (pow x 2)) 1)))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* 1/3 (* (pow B 2) (pow x 2))))) (pow x 2)) 1)))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* (pow B 2) (+ (* -2/45 (* (pow B 2) (pow x 2))) (* 1/3 (pow x 2)))))) (pow x 2)) 1)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (pow (- (* -1 x) 1) 2) B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1/6 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) (pow (- (* -1 x) 1) 2)) B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1/6 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* -1/3 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 1/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))))))) (pow (- (* -1 x) 1) 2)) B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1/6 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* -1/3 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 1/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (+ (* (pow B 2) (+ (* -1/6 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -1/5040 (pow (- (* -1 x) 1) 2)) (+ (* 1/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)))))))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))))))))) (pow (- (* -1 x) 1) 2)) B)))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (pow (- (* -1 x) 1) 2) (pow B 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (+ (* 2 (* (pow B 2) (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (pow (- (* -1 x) 1) 2)) (pow B 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))))) (pow (- (* -1 x) 1) 2)) (pow B 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (+ (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))))) (pow (- (* -1 x) 1) 2)) (pow B 2))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ 1 (* B (- (* -1 x) 1)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/315 (/ 1 (- (* -1 x) 1)))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (pow x 2) 1) (* B (+ 1 (* -1 x))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (/ (pow x 2) (+ 1 (* -1 x)))) (/ 1 (+ 1 (* -1 x)))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (* (pow B 2) (- (* 1/3 (/ (pow x 2) (+ 1 (* -1 x)))) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x))))))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (/ (pow x 2) (+ 1 (* -1 x)))) (/ 1 (+ 1 (* -1 x)))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (+ 1 (* -1 x)))) (* (pow B 2) (- (* -2/45 (/ (pow x 2) (+ 1 (* -1 x)))) (+ (/ (* (+ 31/15120 (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (+ 7/360 (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))))) (+ (* -1/315 (+ 1 (* -1 x))) (* 2/45 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* 1/3 (/ (pow x 2) (+ 1 (* -1 x)))) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x)))))) (+ 1 (* -1 x)))))))) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x))))))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (/ (pow x 2) (+ 1 (* -1 x)))) (/ 1 (+ 1 (* -1 x)))) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (* -1 x)) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))))) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (+ 7/360 (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))))))))) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (* (pow B 2) (+ 31/15120 (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))))))))))))) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 (* x (cos B))) (sin B))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (* x (sin B)) #s(hole binary64 (* x (sin B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (* (sin B) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B))))) (/ (* (pow x 3) (pow (cos B) 3)) (* (sin B) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B)))))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow x 3) (pow (cos B) 3))) (* (sin B) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B)))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (/ (+ 1 (* (pow x 3) (pow (cos B) 3))) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (* (pow x 3) (pow (cos B) 3)))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (* (pow x 3) (pow (cos B) 3))))
#s(approx (* (cos B) x) #s(hole binary64 (* x (cos B))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (* (pow x 2) (pow (cos B) 2)) (* x (cos B)))))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (* x (cos B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* 2 (/ 1 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow (sin B) 2)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (* x (cos B)) #s(hole binary64 (* x (cos B))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (* (pow x 2) (pow (cos B) 2)) 1) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (* (pow x 2) (pow (cos B) 2)) 1) (pow (sin B) 2))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (* (pow x 2) (pow (cos B) 2)) 1)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (* (pow x 2) (pow (cos B) 2)) 1) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (pow (/ 1 (+ 2 (pow F 2))) 1/4)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/2 (* (pow (/ 1 (pow (+ 2 (pow F 2)) 5)) 1/4) x)) (pow (/ 1 (+ 2 (pow F 2))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* x (+ (* -1/2 (pow (/ 1 (pow (+ 2 (pow F 2)) 5)) 1/4)) (* 5/8 (* (pow (/ 1 (pow (+ 2 (pow F 2)) 9)) 1/4) x)))) (pow (/ 1 (+ 2 (pow F 2))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* x (+ (* -1/2 (pow (/ 1 (pow (+ 2 (pow F 2)) 5)) 1/4)) (* x (+ (* -15/16 (* (pow (/ 1 (pow (+ 2 (pow F 2)) 13)) 1/4) x)) (* 5/8 (pow (/ 1 (pow (+ 2 (pow F 2)) 9)) 1/4)))))) (pow (/ 1 (+ 2 (pow F 2))) 1/4))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) x)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (- (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (/ 1 (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (- (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* x (* (cos B) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B))))) (/ (pow (cos B) 2) (sin B))))))) (/ 1 (sin B)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (* (cos B) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 1))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ 1 (* x (cos B)))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ 1 (* x (- (* -1 (* x (+ (* -1 (pow (cos B) 2)) (pow (cos B) 2)))) (* -1 (cos B)))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ 1 (* x (- (* x (- (* -1 (* x (* (cos B) (+ (* -1 (pow (cos B) 2)) (pow (cos B) 2))))) (+ (* -1 (pow (cos B) 2)) (pow (cos B) 2)))) (* -1 (cos B)))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 1))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 1))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (+ 1 (* -1 (* x (cos B))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (+ 1 (* x (- (* x (pow (cos B) 2)) (cos B))))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* -1 (* x (cos B)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* x (- (* x (pow (cos B) 2)) (cos B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (+ (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (* x (- (* -8 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -5/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (/ (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (pow (+ 2 (pow F 2)) 2)))))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* x (- (+ (* -1 (/ (cos B) (sin B))) (* 2 (/ (cos B) (* (pow F 2) (sin B))))) (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (/ 1 (sin B))) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (/ (pow (cos B) 2) (sin B))))) (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))) (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (/ 1 (sin B))) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (+ (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* 2 (/ (pow (cos B) 3) (* (pow F 2) (sin B))))) (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (* (pow (cos B) 2) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (* (cos B) (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))))) (/ (pow (cos B) 2) (sin B)))))) (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))) (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (/ 1 (sin B))) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (- (* x (- (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (- (* x (- (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 2 (/ (cos B) (* (pow F 2) (sin B)))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (- (* x (- (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* 2 (/ (pow (cos B) 3) (* (pow F 2) (sin B))))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ x (* (pow F 2) (sin B))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (/ (* x (cos B)) (* (pow F 2) (sin B))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (* (pow F 2) (sin B)))) (* -1 (/ (cos B) (* (pow F 2) (sin B)))))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (* (pow F 2) (sin B))) (/ (pow (cos B) 2) (* (pow F 2) (sin B))))) (* -1 (/ (cos B) (* (pow F 2) (sin B)))))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* (pow F 2) (sin B)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (+ (* -1 (* (pow F 2) (sin B))) (* -1 (* (pow F 2) (* x (* (cos B) (sin B))))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (sin B))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (+ (* -1 (sin B)) (* -1 (* x (* (cos B) (sin B)))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* 2 (/ (* x (cos B)) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* -1 (/ (pow (cos B) 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* 2 (/ (pow (cos B) 3) (* (pow F 2) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* 2 (/ (* x (cos B)) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (- (* -2 (/ (* x (pow (cos B) 2)) (* (pow F 2) (sin B)))) (* -2 (/ (cos B) (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (- (* x (- (* 2 (/ (* x (pow (cos B) 3)) (* (pow F 2) (sin B)))) (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))))) (* -2 (/ (cos B) (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (sin B)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (* x (pow (cos B) 3)) (sin B))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* -1 (/ (* x (pow (cos B) 4)) (sin B))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* x (- (/ (* x (pow (cos B) 5)) (sin B)) (/ (pow (cos B) 4) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (- (* x (- (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* -1 (/ (cos B) (sin B))))) (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (- (* x (- (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* x (- (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (- (* x (- (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* x (- (+ (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (* x (- (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (* (pow (cos B) 2) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (* (cos B) (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))) (* -1 (/ (pow (cos B) 3) (sin B)))))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (- (* -1 (* x (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (- (* x (- (* x (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (- (* x (- (* x (- (+ (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* x (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (* (pow (cos B) 2) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (* (cos B) (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))))))))))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (/ 2 (pow F 2))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 2))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (* 2 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (* x (- (* x (- (/ (pow (cos B) 2) (sin B)) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 4 (/ (pow (cos B) 2) (sin B)))))) (* -2 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (* x (- (* x (- (+ (* -1 (* x (+ (* 2 (* (cos B) (- (/ (pow (cos B) 2) (sin B)) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 4 (/ (pow (cos B) 2) (sin B))))))) (* 2 (/ (pow (cos B) 3) (sin B)))))) (/ (pow (cos B) 2) (sin B))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 4 (/ (pow (cos B) 2) (sin B)))))) (* -2 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ -1 (pow (sin B) 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 -1))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (+ (* 2 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (+ (* x (+ (* 2 (/ (cos B) (sin B))) (/ (* x (pow (cos B) 2)) (sin B)))) (/ 1 (sin B)))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (+ (* 2 (/ (* x (cos B)) (pow (sin B) 2))) (/ 1 (pow (sin B) 2)))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (+ (* x (+ (* 2 (/ (cos B) (pow (sin B) 2))) (/ (* x (pow (cos B) 2)) (pow (sin B) 2)))) (/ 1 (pow (sin B) 2)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ -1 (sin B))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (- (/ (* x (cos B)) (sin B)) (/ 1 (sin B)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (sin B))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (sin B)) (/ (pow (cos B) 2) (sin B)))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (exp (* 1/4 (+ (log 1/2) (log (/ 1 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (* -1/8 (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ 2 (pow F 2))) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* -1/8 (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ 2 (pow F 2))) x)) (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2)))))) (pow x 2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* -1/8 (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ 2 (pow F 2))) x)) (+ (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* -1/64 (* (+ 2 (pow F 2)) (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2))))) (+ (* -1/3072 (pow (+ 2 (pow F 2)) 3)) (* 1/24 (+ (* -3/4 (pow (+ 2 (pow F 2)) 3)) (+ (* -1/4 (pow (+ 2 (pow F 2)) 3)) (* 3/4 (pow (+ 2 (pow F 2)) 3)))))))) (pow x 3)) (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2)))))) (pow x 2)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (* -1 (/ (cos B) (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (* x (cos B))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (* x (+ (cos B) (/ 1 x)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (* (pow x 3) (pow (cos B) 3))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (* (pow x 3) (+ (/ 1 (pow x 3)) (pow (cos B) 3)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (cos B) x)) (pow (cos B) 2)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (- (+ (/ 1 (pow x 2)) (pow (cos B) 2)) (/ (cos B) x)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (cos B) x)) (pow (cos B) 2)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (+ (* -1 (/ (- (* -1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt x))) (* (/ (* (pow F 3) (pow (sqrt 1/2) 3)) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3)))))) (pow x 3))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))))) (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))) (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (* 1/2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) (pow x 3))) (+ (/ 1 (* (pow F 2) (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (+ (/ 2 (* (pow F 2) (* x (* (cos B) (sin B))))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 3) (sin B)))))))))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (+ (/ 1 (* (pow x 2) (* (cos B) (sin B)))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (+ (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B))))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (+ (/ 1 (* (pow x 2) (* (cos B) (sin B)))) (+ (/ 2 (* (pow F 2) (* x (* (cos B) (sin B))))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 3) (sin B))))))))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -1 (* (pow F 2) (* (cos B) (sin B))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (+ (/ 1 (* (pow F 2) (* (cos B) (sin B)))) (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B)))))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (+ (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 4) (sin B)))))) (+ (/ 1 (* (pow F 2) (* (cos B) (sin B)))) (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B)))))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* (pow F 2) (* x (* (cos B) (sin B)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (+ (* -1 (* (pow F 2) (* (cos B) (sin B)))) (* -1 (/ (* (pow F 2) (sin B)) x))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (* (cos B) (sin B))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* x (+ (* -1 (* (cos B) (sin B))) (* -1 (/ (sin B) x))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B)))) (pow x 2))) (/ 1 (* x (sin B))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (+ (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B)))))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -2 (* (pow F 2) (* x (* (cos B) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (- (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (- (/ 2 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 2 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B))))))) x)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 4) (sin B)))))) (/ 2 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B)))))) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B)))))))) x)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ x (* (pow F 2) (sin B)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* x (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* x (- (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (* (pow F 2) (sin B))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* x (- (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (* 1/2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) (pow x 3))) (+ (/ 1 (* (pow F 2) (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* 2 (/ x (* (pow F 2) (sin B))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* x (- (+ (* 2 (/ 1 (* (pow F 2) (sin B)))) (/ 2 (* (pow F 2) (* x (sin B))))) (/ 4 (* (pow F 2) (* x (* (cos B) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* x (- (+ (* -1 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 2 (/ 1 (* (pow F 2) (sin B)))) (/ 2 (* (pow F 2) (* x (sin B)))))) (/ 4 (* (pow F 2) (* x (* (cos B) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* x (- (+ (* 2 (/ 1 (* (pow F 2) (sin B)))) (+ (/ 2 (* (pow F 2) (* x (sin B)))) (/ 4 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 3) (sin B))))))) (+ (* -2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (* (pow x 3) (cos B)))) (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (* (pow x 2) (cos B)))) (+ (* 4 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (+ (/ 4 (* (pow F 2) (* x (* (cos B) (sin B))))) (/ 4 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (* 2 (/ x (pow F 2)))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (* x (+ (* 2 (/ 1 (* (pow F 2) x))) (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* x (+ 2 (* 2 (/ 1 x))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (/ 1 (sin B)) (* 2 (/ 1 (* x (* (cos B) (sin B))))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (+ (/ 1 (sin B)) (/ 2 (* (pow x 2) (* (pow (cos B) 2) (sin B))))) (/ 2 (* x (* (cos B) (sin B)))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (+ (/ 1 (sin B)) (* 2 (/ 1 (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (+ (* 2 (/ 1 (* (pow x 3) (* (pow (cos B) 3) (sin B))))) (/ 2 (* x (* (cos B) (sin B))))))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (* (pow x 2) (- (/ (pow (cos B) 2) (pow (sin B) 2)) (/ 1 (* (pow x 2) (pow (sin B) 2)))))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (* (pow x 2) (- (pow (cos B) 2) (/ 1 (pow x 2))))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (sin B))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (sin B)))) (/ (pow (cos B) 2) (sin B))))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (sin B)))) (+ (/ 1 (* (pow x 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (pow (sin B) 2)))) (+ (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2)))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ -1 (* x (* (cos B) (sin B))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (cos B) (sin B)))) x)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (- (+ (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (pow x 3) (* (pow (cos B) 4) (sin B))))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (exp (* 1/4 (+ (log -1/2) (log (/ -1 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (* -1/8 (/ (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ 2 (pow F 2))) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2)))))) x)) (* 1/8 (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ 2 (pow F 2))))) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ (* 1/3072 (pow (+ 2 (pow F 2)) 3)) (+ (* 1/64 (* (+ 2 (pow F 2)) (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2))))) (* 1/24 (+ (* -3/4 (pow (+ 2 (pow F 2)) 3)) (+ (* 1/4 (pow (+ 2 (pow F 2)) 3)) (* 3/4 (pow (+ 2 (pow F 2)) 3)))))))) x)) (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2))))))) x)) (* 1/8 (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ 2 (pow F 2))))) x)))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (* x (- (/ 1 (* x (sin B))) (* -1 (/ (cos B) (sin B))))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (* -1 (* x (- (* -1 (cos B)) (/ 1 x))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (* -1 (* (pow x 3) (- (* -1 (pow (cos B) 3)) (/ 1 (pow x 3)))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (cos B) x)) (+ (/ 1 (pow x 2)) (pow (cos B) 2))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* (pow x 2) (* (cos B) (sin B)))) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1 (* (/ (* (pow F 3) (* (sqrt -1) (pow (sqrt -1/2) 3))) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3))))) (* 1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt x))))) x)) (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* x (* (cos B) (sin B))))) x)) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (+ (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) x)) (/ 1 (sin B))) (+ (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))))) x)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) x)) (/ 1 (sin B))) (+ (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B)))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) x)) (/ 1 (sin B))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow (cos B) 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B)))))) x)) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) x)) (/ 1 (sin B))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* -1 (/ (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 3) (sin B))))) (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 4) (sin B))))) (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (+ (* (pow F 2) (* (cos B) (sin B))) (/ (* (pow F 2) (sin B)) x))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* (cos B) (sin B)) (/ (sin B) x))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (/ 1 (* (cos B) (sin B))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))))) x))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 3) (sin B))))))) x)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 4) (sin B))))))) x)) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (/ 1 (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (* x (- (* -1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (* (pow F 2) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (/ 1 (* (cos B) (sin B)))) x)) (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))) x)) (/ 1 (* (pow F 2) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))))) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (/ 1 (* (cos B) (sin B))))) x)) (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))) x)) (/ 1 (* (pow F 2) (sin B))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (+ (* -1 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) x)) (* 2 (/ 1 (* (pow F 2) (sin B))))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) x)) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) x)) (* 2 (/ 1 (* (pow F 2) (sin B))))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (sin B)))))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (+ (* -1 (/ (- (* 2 (/ 1 (* (cos B) (sin B)))) (* 2 (/ 1 (* x (* (pow (cos B) 2) (sin B)))))) x)) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (- (* 2 (/ 1 (* (pow (cos B) 2) (sin B)))) (* 2 (/ 1 (* x (* (pow (cos B) 3) (sin B)))))) x)) (* 2 (/ 1 (* (cos B) (sin B))))) x)) (/ 1 (sin B)))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -2 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) x)) (/ (pow (cos B) 2) (sin B))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -2 (/ (cos B) (pow (sin B) 2))) (/ 1 (* x (pow (sin B) 2)))) x)) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 2) (sin B))) (/ 1 (* x (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 3) (sin B))) (/ 1 (* x (* (pow (cos B) 4) (sin B))))) x)) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
Calls

9 calls:

TimeVariablePointExpression
84.0ms
B
@0
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/ F (sin B)) F (sin B) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+ (* 2 x) (+ (* F F) 2)) 2 (+ (* F F) 2) -1/4 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) -1 (/ (cos B) (sin B)) (cos B) (pow (* x (sin B)) -1) (* x (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+ 1 (pow (* (cos B) x) 3)) (pow (* (cos B) x) 3) (* (cos B) x) 3 (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (* -1 (/ (* x (cos B)) (sin B))) (/ (* x (cos B)) (sin B)) (* x (cos B)) (pow (sin B) -1) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (pow (* x (cos B)) 2) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/ (+ 2 (* 2 x)) (* F F)) (+ 2 (* 2 x)) (* 2 x) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (- (pow (* x (cos B)) 2) 1) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))
37.0ms
F
@inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/ F (sin B)) F (sin B) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+ (* 2 x) (+ (* F F) 2)) 2 (+ (* F F) 2) -1/4 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) -1 (/ (cos B) (sin B)) (cos B) (pow (* x (sin B)) -1) (* x (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+ 1 (pow (* (cos B) x) 3)) (pow (* (cos B) x) 3) (* (cos B) x) 3 (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (* -1 (/ (* x (cos B)) (sin B))) (/ (* x (cos B)) (sin B)) (* x (cos B)) (pow (sin B) -1) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (pow (* x (cos B)) 2) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/ (+ 2 (* 2 x)) (* F F)) (+ 2 (* 2 x)) (* 2 x) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (- (pow (* x (cos B)) 2) 1) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))
29.0ms
B
@-inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/ F (sin B)) F (sin B) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+ (* 2 x) (+ (* F F) 2)) 2 (+ (* F F) 2) -1/4 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) -1 (/ (cos B) (sin B)) (cos B) (pow (* x (sin B)) -1) (* x (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+ 1 (pow (* (cos B) x) 3)) (pow (* (cos B) x) 3) (* (cos B) x) 3 (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (* -1 (/ (* x (cos B)) (sin B))) (/ (* x (cos B)) (sin B)) (* x (cos B)) (pow (sin B) -1) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (pow (* x (cos B)) 2) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/ (+ 2 (* 2 x)) (* F F)) (+ 2 (* 2 x)) (* 2 x) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (- (pow (* x (cos B)) 2) 1) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))
28.0ms
B
@inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/ F (sin B)) F (sin B) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+ (* 2 x) (+ (* F F) 2)) 2 (+ (* F F) 2) -1/4 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) -1 (/ (cos B) (sin B)) (cos B) (pow (* x (sin B)) -1) (* x (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+ 1 (pow (* (cos B) x) 3)) (pow (* (cos B) x) 3) (* (cos B) x) 3 (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (* -1 (/ (* x (cos B)) (sin B))) (/ (* x (cos B)) (sin B)) (* x (cos B)) (pow (sin B) -1) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (pow (* x (cos B)) 2) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/ (+ 2 (* 2 x)) (* F F)) (+ 2 (* 2 x)) (* 2 x) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (- (pow (* x (cos B)) 2) 1) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))
25.0ms
x
@inf
((+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/ F (sin B)) F (sin B) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+ (* 2 x) (+ (* F F) 2)) 2 (+ (* F F) 2) -1/4 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- 1 (* (cos B) x)) (sin B)) (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) -1 (/ (cos B) (sin B)) (cos B) (pow (* x (sin B)) -1) (* x (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+ 1 (pow (* (cos B) x) 3)) (pow (* (cos B) x) 3) (* (cos B) x) 3 (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (* -1 (/ (* x (cos B)) (sin B))) (/ (* x (cos B)) (sin B)) (* x (cos B)) (pow (sin B) -1) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (pow (* x (cos B)) 2) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/ (+ 2 (* 2 x)) (* F F)) (+ 2 (* 2 x)) (* 2 x) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (- (pow (* x (cos B)) 2) 1) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))

rewrite603.0ms (3.3%)

Memory
-3.6MiB live, 610.9MiB allocated; 55ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0403868499
0418865466
01366463578
Stop Event
iter limit
node limit
iter limit
Counts
710 → 796
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
x
(/.f64 #s(literal 1 binary64) (tan.f64 B))
#s(literal 1 binary64)
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
#s(literal 2 binary64)
(fma.f64 F F #s(literal 2 binary64))
#s(literal -1/4 binary64)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
(*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(literal -1 binary64)
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
(pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))
(*.f64 x (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
(neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B)))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)))
(pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))
(*.f64 (cos.f64 B) x)
#s(literal 3 binary64)
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))
(-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))
(*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(*.f64 F F)
(*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (sin.f64 B) #s(literal 2 binary64))
(-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
(/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))
(*.f64 x (cos.f64 B))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))
(pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F (sin B))))
#s(approx F #s(hole binary64 F))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (pow (/ 1 (+ 2 (* 2 x))) 1/4)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (pow (/ 1 (pow (+ 2 (* 2 x)) 5)) 1/4) (pow F 2))) (pow (/ 1 (+ 2 (* 2 x))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* (pow F 2) (+ (* -1/4 (pow (/ 1 (pow (+ 2 (* 2 x)) 5)) 1/4)) (* 5/32 (* (pow (/ 1 (pow (+ 2 (* 2 x)) 9)) 1/4) (pow F 2))))) (pow (/ 1 (+ 2 (* 2 x))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* (pow F 2) (+ (* -1/4 (pow (/ 1 (pow (+ 2 (* 2 x)) 5)) 1/4)) (* (pow F 2) (+ (* -15/128 (* (pow (/ 1 (pow (+ 2 (* 2 x)) 13)) 1/4) (pow F 2))) (* 5/32 (pow (/ 1 (pow (+ 2 (* 2 x)) 9)) 1/4)))))) (pow (/ 1 (+ 2 (* 2 x))) 1/4))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* F F) 2) #s(hole binary64 2))
#s(approx (+ (* F F) 2) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (* F (- (* (pow F 2) (- (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* -1 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (pow F 2))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* (pow F 2) (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (pow F 2))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (pow F 2))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow F 2) (* (pow x 2) (pow (cos B) 2))) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (pow F 2))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow F 2) (* (pow x 2) (pow (cos B) 2))) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (pow F 2))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))) (/ (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (pow F 2))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (/ (+ 2 (* 2 x)) (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ 1 F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (sqrt (/ 1 F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (sqrt (/ 1 F)) (* -1/4 (* (sqrt (/ 1 (pow F 5))) (+ 2 (* 2 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (sqrt (/ 1 F)) (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (+ 2 (* 2 x)))) (* (sqrt (/ 1 (pow F 9))) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (sqrt (/ 1 F)) (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (+ 2 (* 2 x)))) (+ (* (sqrt (/ 1 (pow F 9))) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2)))) (* (sqrt (/ 1 (pow F 13))) (+ (* -1/384 (* (+ 2 (* 2 x)) (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2))))) (+ (* -1/384 (pow (+ 2 (* 2 x)) 3)) (* 1/2880 (+ (* -720 (pow (+ 2 (* 2 x)) 3)) (+ (* -240 (pow (+ 2 (* 2 x)) 3)) (* 720 (pow (+ 2 (* 2 x)) 3)))))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* F F) 2) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) 2) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* 1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* 1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (+ (* 2 (/ 1 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (/ -1 F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) F))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (pow F 6)))))) F))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (* (sqrt (/ 1 F)) (sqrt -1))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (* (sqrt -1) (+ 2 (* 2 x))))) (* (sqrt (/ 1 F)) (sqrt -1)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (* (sqrt -1) (+ 2 (* 2 x))))) (+ (* (sqrt (/ 1 F)) (sqrt -1)) (* (sqrt (/ 1 (pow F 9))) (* (sqrt -1) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2)))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow F 5))) (* (sqrt -1) (+ 2 (* 2 x))))) (+ (* (sqrt (/ 1 F)) (sqrt -1)) (+ (* (sqrt (/ 1 (pow F 9))) (* (sqrt -1) (+ (* 1/96 (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2)))) (* 1/32 (pow (+ 2 (* 2 x)) 2))))) (* (sqrt (/ 1 (pow F 13))) (* (sqrt -1) (+ (* -1/384 (* (+ 2 (* 2 x)) (+ (* -12 (pow (+ 2 (* 2 x)) 2)) (* 24 (pow (+ 2 (* 2 x)) 2))))) (+ (* -1/384 (pow (+ 2 (* 2 x)) 3)) (* 1/2880 (+ (* -720 (pow (+ 2 (* 2 x)) 3)) (+ (* -240 (pow (+ 2 (* 2 x)) 3)) (* 720 (pow (+ 2 (* 2 x)) 3))))))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (- (+ (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 4) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (/ 2 (* (pow F 2) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (+ (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ (* (pow (+ 2 (* 2 x)) 2) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (* (pow F 6) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (* -1 (/ (* (+ 2 (* 2 x)) (+ (* 2 (/ x (pow (sin B) 2))) (* 2 (/ 1 (pow (sin B) 2))))) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 4) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 2) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (+ (* 2 (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))) (* 2 (/ x (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (* -1/2 (/ (* (+ 2 (* 2 x)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))) (* (pow F 6) (* (sin B) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* -1/2 (/ (* (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 4) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (+ (* -1/2 (/ (* (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))) (* (pow F 6) (* (sin B) (pow (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ F B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* 1/6 (* (pow B 2) F))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (/ F (sin B)) #s(hole binary64 (/ (+ F (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1/6 F)))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (* 1/2 x) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ (* 1/2 x) (* (pow B 2) (- (+ (* -1/24 x) (* (pow B 2) (- (* 1/720 x) (+ (* -1/6 (- (* -1/24 x) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x))))) (+ (* -1/5040 (- 1 x)) (* 1/120 (- (* 1/2 x) (* -1/6 (- 1 x))))))))) (+ (* -1/6 (- (* 1/2 x) (* -1/6 (- 1 x)))) (* 1/120 (- 1 x)))))) (* -1/6 (- 1 x))))) x) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (* x (- (/ 1 x) 1)) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (* x (+ 1/3 (* 1/6 (/ 1 x)))))) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (* x (+ 1/45 (* 7/360 (/ 1 x)))))))) B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (+ (* x (+ 1/45 (* 7/360 (/ 1 x)))) (* (pow B 2) (* x (+ 2/945 (* 31/15120 (/ 1 x)))))))))) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (/ 1 x) 1) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (* 1/6 (/ 1 x)))) (/ 1 x)) 1) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (* 7/360 (/ 1 x))))))) (/ 1 x)) 1) B)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (+ (* 7/360 (/ 1 x)) (* (pow B 2) (+ 2/945 (* 31/15120 (/ 1 x)))))))))) (/ 1 x)) 1) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ 1 (* B x))))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ (+ (* 1/6 (/ (pow B 2) x)) (/ 1 x)) B)))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 7/360 (/ (pow B 2) x)) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 31/15120 (/ (pow B 2) x)) (* 7/360 (/ 1 x)))) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (* x (sin B)) #s(hole binary64 (* B x)))
#s(approx (* x (sin B)) #s(hole binary64 (* B (+ x (* -1/6 (* (pow B 2) x))))))
#s(approx (* x (sin B)) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* 1/120 (* (pow B 2) x))))))))
#s(approx (* x (sin B)) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* (pow B 2) (+ (* -1/5040 (* (pow B 2) x)) (* 1/120 x)))))))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (/ (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))) B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* (pow B 2) (- (+ (* -1/6 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ 1 (- (+ 1 (pow x 2)) x))) (+ (* 1/3 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x)) (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2))))))) (+ (* 1/24 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x)))))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ (- (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* (pow B 2) (- (+ (* -1/6 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ 1 (- (+ 1 (pow x 2)) x))) (+ (* 1/3 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* (pow B 2) (- (+ (* -1/6 (/ (- (* 1/3 (pow x 2)) (* 1/24 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* -2/45 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (* 1/24 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* -1/6 (/ (- (* -1 (pow x 2)) (* -1/2 x)) (pow (- (+ 1 (pow x 2)) x) 2))) (+ (* 1/120 (/ 1 (- (+ 1 (pow x 2)) x))) (+ (* 1/3 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))) (/ (* (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x)) (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))))) (- (+ 1 (pow x 2)) x)))))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2)))) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* 1/3 (pow x 2)) (* 1/24 x))) (+ (* -2/45 (pow x 2)) (+ (* -1/5040 (- (+ 1 (pow x 2)) x)) (* 1/120 (- (* -1 (pow x 2)) (* -1/2 x)))))) (* -1/720 x))) (pow (- (+ 1 (pow x 2)) x) 2))))))))) (+ (* -61/240 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/720 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/5040 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)) (+ (/ (* (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x)) (- (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x)))) (* -1 (/ (pow x 2) (pow (- (+ 1 (pow x 2)) x) 2))))) (- (+ 1 (pow x 2)) x)) (/ (* (pow x 3) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)))))))) (+ (* 1/24 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x)))))) (/ (* (pow x 3) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (* -1/2 (/ x (pow (- (+ 1 (pow x 2)) x) 2))) (* 1/6 (/ 1 (- (+ 1 (pow x 2)) x))))))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ 1 (pow x 3)) (* B (- (+ 1 (pow x 2)) x)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (+ (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* -61/240 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* 1/3 (pow x 2)) (* 1/24 x))) (+ (* -2/45 (pow x 2)) (+ (* -1/5040 (- (+ 1 (pow x 2)) x)) (* 1/120 (- (* -1 (pow x 2)) (* -1/2 x)))))) (* -1/720 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (/ (* (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x))))))) (+ (/ (* (+ 1 (pow x 3)) (- (+ (* -1/6 (- (* -1 (pow x 2)) (* -1/2 x))) (+ (* 1/120 (- (+ 1 (pow x 2)) x)) (* 1/3 (pow x 2)))) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (+ (* -1 (pow x 2)) (* -1/6 (- (+ 1 (pow x 2)) x))) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x)))) B)))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (/ (+ 1 (pow x 3)) (- (+ 1 (pow x 2)) x))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ (* (pow B 2) (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (* 1/3 (pow x 2)) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* -1 (pow x 2)) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ (* (pow B 2) (- (+ (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (+ (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (* (pow B 2) (- (* -61/240 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (* -2/45 (pow x 2)) (* -1/720 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (+ (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* 1/3 (pow x 2)) (* 1/24 x))) (- (+ 1 (pow x 2)) x)) (/ (* (- (* -1 (pow x 2)) (* -1/2 x)) (- (* 7/8 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (+ (/ (* (+ 1 (pow x 3)) (- (* 1/3 (pow x 2)) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* -1 (pow x 2)) (* -1/2 x))) (- (+ 1 (pow x 2)) x))))) (- (+ 1 (pow x 2)) x))))))) (+ (/ (* (+ 1 (pow x 3)) (- (* 1/3 (pow x 2)) (* 1/24 x))) (pow (- (+ 1 (pow x 2)) x) 2)) (/ (* (- (* -3/2 (/ (pow x 3) (- (+ 1 (pow x 2)) x))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2))) (- (* -1 (pow x 2)) (* -1/2 x))) (- (+ 1 (pow x 2)) x)))))) (/ (* (+ 1 (pow x 3)) (- (* -1 (pow x 2)) (* -1/2 x))) (pow (- (+ 1 (pow x 2)) x) 2)))) (+ (/ 1 (- (+ 1 (pow x 2)) x)) (/ (pow x 3) (- (+ 1 (pow x 2)) x))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (pow x 3))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (+ (* -3/2 (* (pow B 2) (pow x 3))) (pow x 3)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* 7/8 (* (pow B 2) (pow x 3))))) (pow x 3)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* (pow B 2) (+ (* -61/240 (* (pow B 2) (pow x 3))) (* 7/8 (pow x 3)))))) (pow x 3)))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (pow x 3)))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (+ (* -3/2 (* (pow B 2) (pow x 3))) (pow x 3))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* 7/8 (* (pow B 2) (pow x 3))))) (pow x 3))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (+ (* (pow B 2) (+ (* -3/2 (pow x 3)) (* (pow B 2) (+ (* -61/240 (* (pow B 2) (pow x 3))) (* 7/8 (pow x 3)))))) (pow x 3))))
#s(approx (* (cos B) x) #s(hole binary64 x))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* (cos B) x) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (pow x 2)) x)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (+ (* (pow B 2) (- (* -1 (pow x 2)) (* -1/2 x))) (pow x 2))) x)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (* 1/3 (pow x 2)) (* 1/24 x)))) (* -1/2 x))) (pow x 2))) x)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (+ (* 1/3 (pow x 2)) (* (pow B 2) (- (* -2/45 (pow x 2)) (* -1/720 x)))) (* 1/24 x)))) (* -1/2 x))) (pow x 2))) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (pow x 2) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (+ (* (pow B 2) (- (* -1 (pow x 2)) (* -1/2 x))) (pow x 2)) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (* 1/3 (pow x 2)) (* 1/24 x)))) (* -1/2 x))) (pow x 2)) x)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (+ (* 1/3 (pow x 2)) (* (pow B 2) (- (* -2/45 (pow x 2)) (* -1/720 x)))) (* 1/24 x)))) (* -1/2 x))) (pow x 2)) x)))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (pow x 2)))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (+ (* -1 (* (pow B 2) (pow x 2))) (pow x 2))))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* 1/3 (* (pow B 2) (pow x 2))))) (pow x 2))))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* (pow B 2) (+ (* -2/45 (* (pow B 2) (pow x 2))) (* 1/3 (pow x 2)))))) (pow x 2))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 x))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* B (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* (pow B 2) (- (+ (* -1/315 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/135 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 1/3 (/ (+ (* -1/9 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2))))) (* 2/45 (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -2/3 (/ (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -34/135 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 62/315 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (+ (* -1/9 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* 2/45 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))))))))) (+ (* -4/9 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* 17/45 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (/ (* (- (* -1/3 (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))) (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (/ (* (- (+ (* -1/9 x) (* 2/15 x)) (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2)))))))) (+ (* 2/3 (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (* (- (* 1/3 x) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (- (pow x 2) (/ (pow F 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (pow (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) 2))))) (/ (pow x 2) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (/ (pow F 2) (* (+ 2 (+ (* 2 x) (pow F 2))) (- (* -1 x) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (/ (pow x 2) (- (* -1 x) 1)))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))))))) (/ (pow x 2) (- (* -1 x) 1))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))))))) (/ (pow x 2) (- (* -1 x) 1))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (+ (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (/ (* x (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2 (- (+ (* 31/15120 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/315 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -2/45 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2)))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2))))))))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))))))) (/ (pow x 2) (- (* -1 x) 1))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))))) B)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* 2 (/ x (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -2 (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (* (pow B 2) (- (+ (* -2 (+ (* -1 (/ (* x (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (/ (* x (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (+ (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 31/15120 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/315 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))))) B)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ x (* B (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow B 2) (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ x (* (pow F 2) (- (* -1 x) 1)))) B)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (/ x (* (pow F 2) (- (* -1 x) 1)))) B)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* x (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (/ (* x (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (+ (* -1 (/ (* x (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (/ (* x (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (/ (* x (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (/ x (* (pow F 2) (- (* -1 x) 1)))) B)))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (* (pow F 2) (- (* -1 x) 1)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (+ (* (pow B 2) (* (pow F 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6))) (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360))) (* (pow F 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)))) (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120))) (* (pow F 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)))) (* (pow F 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)))) (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (* -1 x) 1))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6))) 1))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (+ (* -1/3 (- (* -1 x) 1)) (* (pow B 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)))) 1/6))) 1))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* B (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (+ (* -1/3 (- (* -1 x) 1)) (* (pow B 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (+ (* 2/45 (- (* -1 x) 1)) (* (pow B 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120))))) 7/360)))) 1/6))) 1))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow B 2)))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* -1/3 (pow B 2))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* 2/45 (pow B 2)) 1/3))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 2/45 (* -1/315 (pow B 2)))) 1/3))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (* -1 x) 1) B)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) 1) B)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) 1/6))) 1) B)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (* (pow B 2) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) 7/360))) 1/6))) 1) B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (/ (+ (* -1 x) (* -1 (* (pow B 2) (- (* -1/2 x) (* -1/6 x))))) B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* -1 (* (pow B 2) (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))) (* -1 (- (* -1/2 x) (* -1/6 x)))))) B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (+ (* -1 (* (pow B 2) (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))))) (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))))))) B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1/2 x) (* -1/6 x)))) B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))) (* -1/6 x)))) B)))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (+ (* -1/2 x) (* (pow B 2) (- (+ (* 1/24 x) (* (pow B 2) (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))))) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))) (* -1/6 x)))) B)))
#s(approx (* x (cos B)) #s(hole binary64 x))
#s(approx (* x (cos B)) #s(hole binary64 (+ x (* -1/2 (* (pow B 2) x)))))
#s(approx (* x (cos B)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* 1/24 (* (pow B 2) x)))))))
#s(approx (* x (cos B)) #s(hole binary64 (+ x (* (pow B 2) (+ (* -1/2 x) (* (pow B 2) (+ (* -1/720 (* (pow B 2) x)) (* 1/24 x))))))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (* 2 (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))) (* (pow B 2) (- (+ (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (* 2 (- (+ (* 31/15120 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/315 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (- (* 7/360 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* 2/45 (/ 1 (* (pow F 2) (- (* -1 x) 1)))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 1/3 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (- (* -1 x) 1))))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1)))) B)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ 2 (* B (* (pow F 2) (- (* -1 x) 1))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow B 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) B)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2 (/ (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (* 2 (/ (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (* 2 (/ (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) B)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2 (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (+ (* -1 (/ (* (+ (* -2 (/ (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (* 2 (/ (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (* 2 (/ (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))))) (+ (* -2 (/ (pow (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) 2) (* (pow F 2) (pow (- (* -1 x) 1) 3)))) (* 2 (/ (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (* (pow F 2) (pow (- (* -1 x) 1) 2))))))) (* 2 (/ (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (* (pow F 2) (pow (- (* -1 x) 1) 2)))))) (* 2 (/ 1 (* (pow F 2) (- (* -1 x) 1))))) B)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (pow x 2) (* B (- (* -1 x) 1)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* (pow B 2) (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (* (pow B 2) (- (* -2/45 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (- (* -1 x) 1)) (+ (/ (* (- (* 1/3 (/ (pow x 2) (- (* -1 x) 1))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)) (+ (* -1/315 (- (* -1 x) 1)) (* 2/45 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) 31/15120)) (pow (- (* -1 x) 1) 2))))))) (+ (/ (* (- (* -1 (/ (pow x 2) (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (pow x 2) (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360)) (pow (- (* -1 x) 1) 2)))))) (/ (* (pow x 2) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (pow x 2)))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (+ (* -1 (* (pow B 2) (pow x 2))) (pow x 2))))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* 1/3 (* (pow B 2) (pow x 2))))) (pow x 2))))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* (pow B 2) (+ (* -2/45 (* (pow B 2) (pow x 2))) (* 1/3 (pow x 2)))))) (pow x 2))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (+ (* 1/2 (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/2 (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (* 1/2 (- (* -2/45 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2)))))))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1)))) B)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* B (* (pow F 2) (pow (- (* -1 x) 1) 2))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) B)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* (pow B 2) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) B)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* (pow B 2) (- (+ (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (* (pow B 2) (- (* -2/45 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2))))))) (+ (/ (* (+ 2 (* 2 x)) (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (* (pow x 2) (+ 2 (* 2 x))) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ 2 (* 2 x)) (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1))) (* (pow F 2) (pow (- (* -1 x) 1) 4))))) (/ (* (+ 2 (* 2 x)) (- (pow x 2) 1)) (* (pow F 2) (pow (- (* -1 x) 1) 2)))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (pow x 2) 1) (* B (pow (- (* -1 x) 1) 2)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ 1 (pow (- (* -1 x) 1) 2))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (* 1/3 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ 1 (pow (- (* -1 x) 1) 2))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (* -2/45 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2)) (+ (/ (* (+ (* -1/2 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -41/3024 (pow (- (* -1 x) 1) 2)) (+ (* 13/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* 1/3 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2))))) (pow (- (* -1 x) 1) 2))))))) (+ (/ (* (+ (* -1 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 13/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (* -1 (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (pow (- (* -1 x) 1) 2)))))) (/ (* (+ (* -1/2 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (- (pow x 2) 1)) (pow (- (* -1 x) 1) 4)))) (/ (pow x 2) (pow (- (* -1 x) 1) 2))) (/ 1 (pow (- (* -1 x) 1) 2))) B)))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (pow x 2) 1) (pow B 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (pow x 2)) 1) (pow B 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (* 1/3 (pow x 2)) (+ (* -1/3 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (* 2/45 (- (pow x 2) 1)))))) (* -1/3 (- (pow x 2) 1)))) (pow x 2)) 1) (pow B 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (pow x 2)) (* (pow B 2) (- (+ (* 1/3 (pow x 2)) (* (pow B 2) (- (* -2/45 (pow x 2)) (+ (* -1/3 (- (* 1/3 (pow x 2)) (+ (* -1/3 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (* 2/45 (- (pow x 2) 1))))) (+ (* -1/315 (- (pow x 2) 1)) (* 2/45 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1))))))))) (+ (* -1/3 (- (* -1 (pow x 2)) (* -1/3 (- (pow x 2) 1)))) (* 2/45 (- (pow x 2) 1)))))) (* -1/3 (- (pow x 2) 1)))) (pow x 2)) 1) (pow B 2))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (pow x 2) 1)))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (+ (* -1 (* (pow B 2) (pow x 2))) (pow x 2)) 1)))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* 1/3 (* (pow B 2) (pow x 2))))) (pow x 2)) 1)))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (+ (* (pow B 2) (+ (* -1 (pow x 2)) (* (pow B 2) (+ (* -2/45 (* (pow B 2) (pow x 2))) (* 1/3 (pow x 2)))))) (pow x 2)) 1)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (pow (- (* -1 x) 1) 2) B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1/6 (pow (- (* -1 x) 1) 2)) (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))))) (pow (- (* -1 x) 1) 2)) B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1/6 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* -1/3 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 1/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))))))) (pow (- (* -1 x) 1) 2)) B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1/6 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* -1/3 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 1/120 (pow (- (* -1 x) 1) 2)) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (+ (* (pow B 2) (+ (* -1/6 (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))) (+ (* -1/5040 (pow (- (* -1 x) 1) 2)) (+ (* 1/60 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360)))))))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))))))))) (pow (- (* -1 x) 1) 2)) B)))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (pow (- (* -1 x) 1) 2) (pow B 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (+ (* 2 (* (pow B 2) (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)))) (pow (- (* -1 x) 1) 2)) (pow B 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2))))) (pow (- (* -1 x) 1) 2)) (pow B 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6))) (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))) (+ (* (pow B 2) (+ (* 2 (* (- (* -1 x) 1) (- (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) 31/15120))) (* 2 (* (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360))))) (pow (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) 2)))))) (pow (- (* -1 x) 1) 2)) (pow B 2))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ 1 (* B (- (* -1 x) 1)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/315 (/ 1 (- (* -1 x) 1)))) (+ (* -1 (/ (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x)))))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6)) (* 2/45 (- (* -1 x) 1)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (+ (* -1 (/ (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* -1 (- (* -1/2 x) (* -1/6 x))) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (/ (* (- (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (- (* -1 x) 1))) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))) (* -1 (/ (- (* -1/2 x) (* -1/6 x)) (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (pow x 2) 1) (* B (+ 1 (* -1 x))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (/ (pow x 2) (+ 1 (* -1 x)))) (/ 1 (+ 1 (* -1 x)))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (* (pow B 2) (- (* 1/3 (/ (pow x 2) (+ 1 (* -1 x)))) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x))))))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (/ (pow x 2) (+ 1 (* -1 x)))) (/ 1 (+ 1 (* -1 x)))) B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (* (pow B 2) (- (+ (* 1/3 (/ (pow x 2) (+ 1 (* -1 x)))) (* (pow B 2) (- (* -2/45 (/ (pow x 2) (+ 1 (* -1 x)))) (+ (/ (* (+ 31/15120 (+ (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))) (+ (* -1/3 (+ 7/360 (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))))) (+ (* -1/315 (+ 1 (* -1 x))) (* 2/45 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* 1/3 (/ (pow x 2) (+ 1 (* -1 x)))) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x)))))) (+ 1 (* -1 x)))))))) (+ (/ (* (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/3 (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))) (* 2/45 (+ 1 (* -1 x)))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (* -1 (/ (pow x 2) (+ 1 (* -1 x)))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (+ 1 (* -1 x))))))) (/ (* (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* -1/3 (+ 1 (* -1 x))))) (- (pow x 2) 1)) (pow (+ 1 (* -1 x)) 2)))) (/ (pow x 2) (+ 1 (* -1 x)))) (/ 1 (+ 1 (* -1 x)))) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (* -1 x)) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (* -1 (- (* -1/2 x) (* -1/6 x))))))) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (+ 7/360 (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x))))))))))) B)))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* -1 (- (* -1/2 x) (* -1/6 x))) (* (pow B 2) (+ 7/360 (+ (* -1 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (* (pow B 2) (+ 31/15120 (* -1 (- (* -1/720 x) (+ (* -1/6 (- (* 1/24 x) (+ (* -1/6 (- (* -1/2 x) (* -1/6 x))) (* 1/120 x)))) (+ (* -1/5040 x) (* 1/120 (- (* -1/2 x) (* -1/6 x))))))))))))))))) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ (- 1 (* x (cos B))) (sin B))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (pow (* x (sin B)) -1) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (* x (sin B)) #s(hole binary64 (* x (sin B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (* (sin B) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B))))) (/ (* (pow x 3) (pow (cos B) 3)) (* (sin B) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B)))))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow x 3) (pow (cos B) 3))) (* (sin B) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B)))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (/ (+ 1 (* (pow x 3) (pow (cos B) 3))) (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (+ 1 (* (pow x 3) (pow (cos B) 3)))))
#s(approx (pow (* (cos B) x) 3) #s(hole binary64 (* (pow x 3) (pow (cos B) 3))))
#s(approx (* (cos B) x) #s(hole binary64 (* x (cos B))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (- (+ 1 (* (pow x 2) (pow (cos B) 2))) (* x (cos B)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (- (* (pow x 2) (pow (cos B) 2)) (* x (cos B)))))
#s(approx (* (* (cos B) x) (* (cos B) x)) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (* 1 (* (cos B) x)) #s(hole binary64 (* x (cos B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (/ (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ (pow F 2) (* (pow (sin B) 2) (+ 2 (+ (* 2 x) (pow F 2)))))) (- (* -1 (/ (* x (cos B)) (sin B))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* 2 (/ 1 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 1/2 (/ (* (+ 2 (* 2 x)) (- (* (pow x 2) (pow (cos B) 2)) 1)) (* (pow F 2) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (+ (* 2 (/ x (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))) (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow (sin B) 2)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x (cos B)) (sin B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (* x (cos B)) #s(hole binary64 (* x (cos B))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (pow (* x (cos B)) 2) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ (- (* (pow x 2) (pow (cos B) 2)) 1) (* (pow (sin B) 3) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (- (* (pow x 2) (pow (cos B) 2)) 1) (pow (sin B) 2))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (- (* (pow x 2) (pow (cos B) 2)) 1)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (pow (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) 2)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ (- (* (pow x 2) (pow (cos B) 2)) 1) (* (pow (sin B) 2) (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 3/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* x (+ (* -5/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (pow (/ 1 (+ 2 (pow F 2))) 1/4)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* -1/2 (* (pow (/ 1 (pow (+ 2 (pow F 2)) 5)) 1/4) x)) (pow (/ 1 (+ 2 (pow F 2))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* x (+ (* -1/2 (pow (/ 1 (pow (+ 2 (pow F 2)) 5)) 1/4)) (* 5/8 (* (pow (/ 1 (pow (+ 2 (pow F 2)) 9)) 1/4) x)))) (pow (/ 1 (+ 2 (pow F 2))) 1/4))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (* x (+ (* -1/2 (pow (/ 1 (pow (+ 2 (pow F 2)) 5)) 1/4)) (* x (+ (* -15/16 (* (pow (/ 1 (pow (+ 2 (pow F 2)) 13)) 1/4) x)) (* 5/8 (pow (/ 1 (pow (+ 2 (pow F 2)) 9)) 1/4)))))) (pow (/ 1 (+ 2 (pow F 2))) 1/4))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (/ (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) x)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (- (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (/ 1 (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (- (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* x (* (cos B) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B))))) (/ (pow (cos B) 2) (sin B))))))) (/ 1 (sin B)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (+ (* x (- (* -1 (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (+ (* x (- (* x (- (* -1 (* x (* (cos B) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 1))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ 1 (* x (cos B)))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ 1 (* x (- (* -1 (* x (+ (* -1 (pow (cos B) 2)) (pow (cos B) 2)))) (* -1 (cos B)))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (+ 1 (* x (- (* x (- (* -1 (* x (* (cos B) (+ (* -1 (pow (cos B) 2)) (pow (cos B) 2))))) (+ (* -1 (pow (cos B) 2)) (pow (cos B) 2)))) (* -1 (cos B)))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 1))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 1))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (+ 1 (* -1 (* x (cos B))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (+ 1 (* x (- (* x (pow (cos B) 2)) (cos B))))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* -1 (* x (cos B)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* x (- (* x (pow (cos B) 2)) (cos B)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (+ (* x (- (+ (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (- (+ (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (* x (- (* -8 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -5/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -1 (* (/ (* (sin B) (+ (* -4 (/ (pow F 2) (* (pow (sin B) 2) (pow (+ 2 (pow F 2)) 3)))) (/ (pow (cos B) 2) (pow (sin B) 2)))) F) (sqrt (+ 2 (pow F 2))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (/ (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (pow (+ 2 (pow F 2)) 2)))))))) (+ (* -1 (* (/ (* (sin B) (* (- (* -2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))) F) (sqrt (+ 2 (pow F 2))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* -1 (- (* -1 (/ (cos B) (sin B))) (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* x (- (+ (* -1 (/ (cos B) (sin B))) (* 2 (/ (cos B) (* (pow F 2) (sin B))))) (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (/ 1 (sin B))) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (/ (pow (cos B) 2) (sin B))))) (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))) (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (/ 1 (sin B))) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (- (+ (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (+ (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* 2 (/ (pow (cos B) 3) (* (pow F 2) (sin B))))) (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (* (pow (cos B) 2) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (* (cos B) (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))))) (/ (pow (cos B) 2) (sin B)))))) (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))) (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (/ 1 (sin B))) (/ 1 (* (pow F 2) (sin B))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (- (* x (- (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (- (* x (- (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 2 (/ (cos B) (* (pow F 2) (sin B)))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (- (* x (- (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (- (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* 2 (/ (pow (cos B) 3) (* (pow F 2) (sin B))))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ x (* (pow F 2) (sin B))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (/ (* x (cos B)) (* (pow F 2) (sin B))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (* (pow F 2) (sin B)))) (* -1 (/ (cos B) (* (pow F 2) (sin B)))))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (* (pow F 2) (sin B))) (/ (pow (cos B) 2) (* (pow F 2) (sin B))))) (* -1 (/ (cos B) (* (pow F 2) (sin B)))))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* (pow F 2) (sin B)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (+ (* -1 (* (pow F 2) (sin B))) (* -1 (* (pow F 2) (* x (* (cos B) (sin B))))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (sin B))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (+ (* -1 (sin B)) (* -1 (* x (* (cos B) (sin B)))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* 2 (/ (* x (cos B)) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* -1 (/ (pow (cos B) 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (+ (* 2 (/ (cos B) (* (pow F 2) (sin B)))) (* x (+ (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* 2 (/ (pow (cos B) 3) (* (pow F 2) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* 2 (/ (* x (cos B)) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (- (* -2 (/ (* x (pow (cos B) 2)) (* (pow F 2) (sin B)))) (* -2 (/ (cos B) (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* x (- (* x (- (* 2 (/ (* x (pow (cos B) 3)) (* (pow F 2) (sin B)))) (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))))) (* -2 (/ (cos B) (* (pow F 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (sin B)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (* x (pow (cos B) 3)) (sin B))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* -1 (/ (* x (pow (cos B) 4)) (sin B))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* x (- (/ (* x (pow (cos B) 5)) (sin B)) (/ (pow (cos B) 4) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (- (* x (- (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* -1 (/ (cos B) (sin B))))) (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (- (* x (- (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* x (- (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (- (* x (- (+ (* -1/2 (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B)))))) (* x (- (+ (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (* x (- (* 1/2 (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (* (pow (cos B) 2) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (* (cos B) (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))))))) (* -1 (/ (pow (cos B) 3) (sin B)))))) (/ (pow (cos B) 2) (sin B))))) (* -1 (/ (cos B) (sin B))))) (+ (/ 1 (sin B)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (/ -2 (* (pow F 2) (sin B)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (- (* -1 (* x (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (- (* x (- (* x (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (- (* x (- (* x (- (+ (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (* x (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -1 (* (pow (cos B) 2) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (* (cos B) (- (* 2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B)))))))))))) (+ (* -2 (* (cos B) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* -2 (/ (pow (cos B) 2) (* (pow F 2) (sin B))))))) (+ (* -4 (/ (cos B) (* (pow F 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (/ 2 (pow F 2))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 2))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (* 2 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (* x (- (* x (- (/ (pow (cos B) 2) (sin B)) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 4 (/ (pow (cos B) 2) (sin B)))))) (* -2 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (* x (- (* x (- (+ (* -1 (* x (+ (* 2 (* (cos B) (- (/ (pow (cos B) 2) (sin B)) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 4 (/ (pow (cos B) 2) (sin B))))))) (* 2 (/ (pow (cos B) 3) (sin B)))))) (/ (pow (cos B) 2) (sin B))) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* 4 (/ (pow (cos B) 2) (sin B)))))) (* -2 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ -1 (pow (sin B) 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2)) (/ 1 (pow (sin B) 2)))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 -1))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (+ (* 2 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (+ (* x (+ (* 2 (/ (cos B) (sin B))) (/ (* x (pow (cos B) 2)) (sin B)))) (/ 1 (sin B)))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (+ (* 2 (/ (* x (cos B)) (pow (sin B) 2))) (/ 1 (pow (sin B) 2)))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (+ (* x (+ (* 2 (/ (cos B) (pow (sin B) 2))) (/ (* x (pow (cos B) 2)) (pow (sin B) 2)))) (/ 1 (pow (sin B) 2)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ -1 (sin B))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (- (/ (* x (cos B)) (sin B)) (/ 1 (sin B)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (sin B))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (sin B)) (/ (pow (cos B) 2) (sin B)))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))) (sqrt 1/2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (exp (* 1/4 (+ (log 1/2) (log (/ 1 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (* -1/8 (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ 2 (pow F 2))) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* -1/8 (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ 2 (pow F 2))) x)) (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2)))))) (pow x 2))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* -1/8 (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ 2 (pow F 2))) x)) (+ (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* -1/64 (* (+ 2 (pow F 2)) (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2))))) (+ (* -1/3072 (pow (+ 2 (pow F 2)) 3)) (* 1/24 (+ (* -3/4 (pow (+ 2 (pow F 2)) 3)) (+ (* -1/4 (pow (+ 2 (pow F 2)) 3)) (* 3/4 (pow (+ 2 (pow F 2)) 3)))))))) (pow x 3)) (/ (* (exp (* 1/4 (+ (log 1/2) (log (/ 1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2)))))) (pow x 2)))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) #s(hole binary64 (* -1 (/ (cos B) (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (* x (cos B))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (* x (+ (cos B) (/ 1 x)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (* (pow x 3) (pow (cos B) 3))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (* (pow x 3) (+ (/ 1 (pow x 3)) (pow (cos B) 3)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (cos B) x)) (pow (cos B) 2)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (- (+ (/ 1 (pow x 2)) (pow (cos B) 2)) (/ (cos B) x)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (cos B) x)) (pow (cos B) 2)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (* (pow F 2) (pow (sqrt 1/2) 2)) (* (pow x 3) (* (cos B) (sin B))))) (+ (* -1 (/ (- (* -1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt x))) (* (/ (* (pow F 3) (pow (sqrt 1/2) 3)) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3)))))) (pow x 3))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))))) (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))) (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (* 1/2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) (pow x 3))) (+ (/ 1 (* (pow F 2) (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (+ (/ 2 (* (pow F 2) (* x (* (cos B) (sin B))))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 3) (sin B)))))))))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (+ (/ 1 (* (pow x 2) (* (cos B) (sin B)))) (/ 2 (* (pow F 2) (* x (* (cos B) (sin B)))))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (+ (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B))))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (+ (/ 1 (* (pow x 2) (* (cos B) (sin B)))) (+ (/ 2 (* (pow F 2) (* x (* (cos B) (sin B))))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 3) (sin B))))))))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -1 (* (pow F 2) (* (cos B) (sin B))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (+ (/ 1 (* (pow F 2) (* (cos B) (sin B)))) (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B)))))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (+ (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 4) (sin B)))))) (+ (/ 1 (* (pow F 2) (* (cos B) (sin B)))) (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B)))))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* (pow F 2) (* x (* (cos B) (sin B)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (+ (* -1 (* (pow F 2) (* (cos B) (sin B)))) (* -1 (/ (* (pow F 2) (sin B)) x))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (* (cos B) (sin B))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* x (+ (* -1 (* (cos B) (sin B))) (* -1 (/ (sin B) x))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (+ (* -1 (/ (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B)))) (pow x 2))) (/ 1 (* x (sin B))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (+ (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))) (/ 2 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))) (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (cos B) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B)))))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ -2 (* (pow F 2) (* x (* (cos B) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (- (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B)))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (- (/ 2 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 2 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B))))))) x)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 4) (sin B)))))) (/ 2 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B)))))) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 3) (sin B)))))))) x)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (/ x (* (pow F 2) (sin B)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* x (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (* (pow F 2) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* x (- (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (* (pow F 2) (sin B))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* x (- (+ (* -1/2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (+ (* 1/2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) (pow x 3))) (+ (/ 1 (* (pow F 2) (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* 2 (/ x (* (pow F 2) (sin B))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* x (- (+ (* 2 (/ 1 (* (pow F 2) (sin B)))) (/ 2 (* (pow F 2) (* x (sin B))))) (/ 4 (* (pow F 2) (* x (* (cos B) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* x (- (+ (* -1 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (pow x 2))) (+ (* 2 (/ 1 (* (pow F 2) (sin B)))) (/ 2 (* (pow F 2) (* x (sin B)))))) (/ 4 (* (pow F 2) (* x (* (cos B) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* x (- (+ (* 2 (/ 1 (* (pow F 2) (sin B)))) (+ (/ 2 (* (pow F 2) (* x (sin B)))) (/ 4 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 3) (sin B))))))) (+ (* -2 (/ (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (* (pow x 3) (cos B)))) (+ (* 2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (* (pow x 2) (cos B)))) (+ (* 4 (/ 1 (* (pow F 2) (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (+ (/ 4 (* (pow F 2) (* x (* (cos B) (sin B))))) (/ 4 (* (pow F 2) (* (pow x 3) (* (pow (cos B) 2) (sin B)))))))))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (* 2 (/ x (pow F 2)))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) #s(hole binary64 (* x (+ (* 2 (/ 1 (* (pow F 2) x))) (* 2 (/ 1 (pow F 2)))))))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* x (+ 2 (* 2 (/ 1 x))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (/ 1 (sin B)) (* 2 (/ 1 (* x (* (cos B) (sin B))))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (+ (/ 1 (sin B)) (/ 2 (* (pow x 2) (* (pow (cos B) 2) (sin B))))) (/ 2 (* x (* (cos B) (sin B)))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (- (+ (/ 1 (sin B)) (* 2 (/ 1 (* (pow x 2) (* (pow (cos B) 2) (sin B)))))) (+ (* 2 (/ 1 (* (pow x 3) (* (pow (cos B) 3) (sin B))))) (/ 2 (* x (* (cos B) (sin B))))))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) #s(hole binary64 (* (pow x 2) (- (/ (pow (cos B) 2) (pow (sin B) 2)) (/ 1 (* (pow x 2) (pow (sin B) 2)))))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (* (pow x 2) (pow (cos B) 2))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(hole binary64 (* (pow x 2) (- (pow (cos B) 2) (/ 1 (pow x 2))))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (sin B))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (sin B)))) (/ (pow (cos B) 2) (sin B))))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (sin B)))) (+ (/ 1 (* (pow x 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (pow (sin B) 2)))) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (* (pow x 2) (+ (* 2 (/ (cos B) (* x (pow (sin B) 2)))) (+ (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2)))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ -1 (* x (* (cos B) (sin B))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (cos B) (sin B)))) x)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (/ (- (+ (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (pow x 3) (* (pow (cos B) 4) (sin B))))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (sqrt x) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/8 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (exp (* 1/4 (+ (log -1/2) (log (/ -1 x)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (* -1/8 (/ (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ 2 (pow F 2))) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2)))))) x)) (* 1/8 (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ 2 (pow F 2))))) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) #s(hole binary64 (+ (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ (* 1/3072 (pow (+ 2 (pow F 2)) 3)) (+ (* 1/64 (* (+ 2 (pow F 2)) (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2))))) (* 1/24 (+ (* -3/4 (pow (+ 2 (pow F 2)) 3)) (+ (* 1/4 (pow (+ 2 (pow F 2)) 3)) (* 3/4 (pow (+ 2 (pow F 2)) 3)))))))) x)) (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ (* 1/128 (pow (+ 2 (pow F 2)) 2)) (* 1/8 (+ (* -1/4 (pow (+ 2 (pow F 2)) 2)) (* 1/2 (pow (+ 2 (pow F 2)) 2))))))) x)) (* 1/8 (* (exp (* 1/4 (+ (log -1/2) (log (/ -1 x))))) (+ 2 (pow F 2))))) x)))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) #s(hole binary64 (* -1 (* x (- (/ 1 (* x (sin B))) (* -1 (/ (cos B) (sin B))))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(hole binary64 (* -1 (* x (- (* -1 (cos B)) (/ 1 x))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(hole binary64 (* -1 (* (pow x 3) (- (* -1 (pow (cos B) 3)) (/ 1 (pow x 3)))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (cos B) x)) (+ (/ 1 (pow x 2)) (pow (cos B) 2))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* (pow x 2) (* (cos B) (sin B)))) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (pow F 2) (* (cos B) (sin B)))) (+ (* -1 (* (/ (* (pow F 3) (* (sqrt -1) (pow (sqrt -1/2) 3))) (* (pow (cos B) 2) (sin B))) (sqrt (/ 1 (pow x 3))))) (* 1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt x))))) x)) (/ (* (pow F 2) (pow (sqrt -1/2) 2)) (* x (* (cos B) (sin B))))) x)) (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (+ (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) x)) (/ 1 (sin B))) (+ (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))))) x)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) x)) (/ 1 (sin B))) (+ (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))))) x)) (+ (/ 1 (* (pow F 2) (sin B))) (/ (cos B) (sin B))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B)))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) x)) (/ 1 (sin B))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow (cos B) 2) (sin B)))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B)))))) x)) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) x)) (/ 1 (sin B))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* -1 (/ (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 3) (sin B))))) (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (/ 1 (* (pow F 2) (* x (* (pow (cos B) 4) (sin B))))) (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (+ (* (pow F 2) (* (cos B) (sin B))) (/ (* (pow F 2) (sin B)) x))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* (cos B) (sin B)) (/ (sin B) x))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (/ 1 (* (cos B) (sin B))) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (+ (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (/ 1 (* (cos B) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 2) (sin B))))))) x))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 3) (sin B))))))) x)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (* 2 (/ 1 (* (pow F 2) (* x (* (pow (cos B) 4) (sin B))))))) x)) (* 2 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (/ 1 (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (* x (- (* -1/2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (/ 1 (* (pow F 2) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (/ 1 (* (cos B) (sin B)))) x)) (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))) x)) (/ 1 (* (pow F 2) (sin B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))))) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (+ (* 1/2 (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B))))) (/ 1 (* (cos B) (sin B))))) x)) (* 1/2 (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))))) x)) (/ 1 (* (pow F 2) (sin B))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (+ (* -1 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) x)) (* 2 (/ 1 (* (pow F 2) (sin B))))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (sin B)))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 3) (sin B))))) (+ (* -2 (/ (- (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) (cos B))) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B))))))) x)) (* 4 (/ 1 (* (pow F 2) (* (pow (cos B) 2) (sin B)))))) (* -2 (/ (- (* 2 (/ 1 (* (pow F 2) (sin B)))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) (cos B)))) x)) (* 2 (/ 1 (* (pow F 2) (sin B))))) (* 4 (/ 1 (* (pow F 2) (* (cos B) (sin B)))))) x)) (* 2 (/ 1 (* (pow F 2) (sin B)))))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (+ (* -1 (/ (- (* 2 (/ 1 (* (cos B) (sin B)))) (* 2 (/ 1 (* x (* (pow (cos B) 2) (sin B)))))) x)) (/ 1 (sin B)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (- (* 2 (/ 1 (* (pow (cos B) 2) (sin B)))) (* 2 (/ 1 (* x (* (pow (cos B) 3) (sin B)))))) x)) (* 2 (/ 1 (* (cos B) (sin B))))) x)) (/ 1 (sin B)))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -2 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) x)) (/ (pow (cos B) 2) (sin B))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (- (* -2 (/ (cos B) (pow (sin B) 2))) (/ 1 (* x (pow (sin B) 2)))) x)) (/ (pow (cos B) 2) (pow (sin B) 2))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 2) (sin B))) (/ 1 (* x (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 3) (sin B))) (/ 1 (* x (* (pow (cos B) 4) (sin B))))) x)) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
Outputs
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(+.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
x
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
#s(literal 1 binary64)
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
(*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 F) (neg.f64 (sin.f64 B)))
(/.f64 F (sin.f64 B))
F
(sin.f64 B)
(*.f64 (neg.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))) (neg.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))) (fabs.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))
(pow.f64 (*.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))) #s(literal -1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))) #s(literal -1/2 binary64)))
(pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))) #s(literal -1/4 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 3 binary64)) (pow.f64 (fma.f64 F F #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x) (-.f64 (*.f64 (fma.f64 F F #s(literal 2 binary64)) (fma.f64 F F #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) x) (fma.f64 F F #s(literal 2 binary64))))))
(fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) x) (fma.f64 F F #s(literal 2 binary64)))
#s(literal 2 binary64)
(/.f64 (+.f64 (pow.f64 (*.f64 F F) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (*.f64 F F) (*.f64 F F) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 F) (neg.f64 F) #s(literal 2 binary64))
(fma.f64 (fabs.f64 F) (fabs.f64 F) #s(literal 2 binary64))
(fma.f64 F F #s(literal 2 binary64))
(+.f64 (*.f64 F F) #s(literal 2 binary64))
#s(literal -1/4 binary64)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
(*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (-.f64 (*.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(literal -1 binary64)
(/.f64 (neg.f64 (cos.f64 B)) (neg.f64 (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(sin.f64 (+.f64 B (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 B))
(cos.f64 B)
(*.f64 (pow.f64 x #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x (sin.f64 B))))
(/.f64 #s(literal 1 binary64) (*.f64 x (sin.f64 B)))
(exp.f64 (*.f64 (log.f64 (*.f64 x (sin.f64 B))) #s(literal -1 binary64)))
(*.f64 x (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
(neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B)))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))) (neg.f64 (sin.f64 B)))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (/.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (*.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))))))
(+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (pow.f64 x #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 (cos.f64 B) x))
(*.f64 (*.f64 (cos.f64 B) x) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 B) x)) #s(literal 3 binary64)))
(*.f64 (cos.f64 B) x)
#s(literal 3 binary64)
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))) (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))))))
(+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))
(-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)))
(*.f64 (neg.f64 (*.f64 (cos.f64 B) x)) (neg.f64 (*.f64 (cos.f64 B) x)))
(*.f64 (fabs.f64 (*.f64 (cos.f64 B) x)) (fabs.f64 (*.f64 (cos.f64 B) x)))
(*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x))
(pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (-.f64 (*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 x) (neg.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 F F)
(pow.f64 F #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (sin.f64 B) (sin.f64 B))
(pow.f64 (sin.f64 B) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal 2 binary64)))
(-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
(/.f64 (neg.f64 (*.f64 x (cos.f64 B))) (neg.f64 (sin.f64 B)))
(/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))
(*.f64 x (cos.f64 B))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))))
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(*.f64 (/.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))) (neg.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(*.f64 (*.f64 x x) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))
(*.f64 (*.f64 x (cos.f64 B)) (*.f64 x (cos.f64 B)))
(pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 x (cos.f64 B))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 F F) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (*.f64 (*.f64 F F) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (neg.f64 (*.f64 F F)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F))
(+.f64 (/.f64 #s(literal 2 binary64) (*.f64 F F)) (/.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 F F)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))
(expm1.f64 (*.f64 (log.f64 (*.f64 x (cos.f64 B))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))
(*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64)))
(pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) #s(literal -1 binary64)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))))
#s(approx (/ F (sin B)) (/.f64 F (sin.f64 B)))
#s(approx F F)
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (*.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/4 binary64)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)) #s(literal 1/4 binary64)) (*.f64 F F)) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/4 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 5/32 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -9 binary64)) #s(literal 1/4 binary64)) (*.f64 F F)))) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/4 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/128 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -13 binary64)) #s(literal 1/4 binary64)) (*.f64 F F)) (*.f64 #s(literal 5/32 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -9 binary64)) #s(literal 1/4 binary64)))))) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/4 binary64))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))
#s(approx (+ (* F F) 2) #s(literal 2 binary64))
#s(approx (+ (* F F) 2) (+.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 F (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (*.f64 F (-.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 (sin.f64 B) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 F F)))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (*.f64 F F) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 (sin.f64 B) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 F F)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 F F)))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 F F)))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (* F F) (*.f64 F F))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 F F) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (*.f64 F F)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 (sin.f64 B) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (*.f64 F F)))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (pow.f64 F #s(literal -1 binary64)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))) F))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) F))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))))) F))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (/.f64 #s(literal 1 binary64) (sqrt.f64 F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 F)) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -5 binary64))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 F)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -5 binary64))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -9 binary64))) (fma.f64 #s(literal 1/96 binary64) (fma.f64 #s(literal -12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 F)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -5 binary64))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (fma.f64 (sqrt.f64 (pow.f64 F #s(literal -9 binary64))) (fma.f64 #s(literal 1/96 binary64) (fma.f64 #s(literal -12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -13 binary64))) (fma.f64 #s(literal -1/384 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/384 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) (*.f64 #s(literal 1/2880 binary64) (fma.f64 #s(literal -720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) (fma.f64 #s(literal -240 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)))))))))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 F F))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 (*.f64 F F) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 F F)) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64)))))))
#s(approx (+ (* F F) 2) (*.f64 F F))
#s(approx (+ (* F F) 2) (*.f64 (*.f64 F F) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64)))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (/.f64 #s(literal -1 binary64) F))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)))) F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) F)))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))))) F)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (sqrt.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -5 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))) (sqrt.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -5 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 F)) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -9 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/96 binary64) (fma.f64 #s(literal -12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -5 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 F)) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (pow.f64 F #s(literal -9 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/96 binary64) (fma.f64 #s(literal -12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (pow.f64 F #s(literal -13 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/384 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 24 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/384 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) (*.f64 #s(literal 1/2880 binary64) (fma.f64 #s(literal -720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) (fma.f64 #s(literal -240 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) (*.f64 #s(literal 720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))))))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal 2 binary64) (/.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (sin.f64 B)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (/.f64 (-.f64 (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x)) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x))))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 x (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (/ 1 (tan B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (tan B) B)
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 B B)))))
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 B B)))))))
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 B B)))))))))
#s(approx B B)
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))))) B))
#s(approx (/ F (sin B)) (/.f64 F B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 F (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) F))) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 F (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))) (*.f64 #s(literal -1/6 binary64) F)))) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 F (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))) (*.f64 #s(literal -1/6 binary64) F)))) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 B B)))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 B B)))) #s(literal 1/6 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1 binary64) x)))))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))) x) B))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/24 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1 binary64) x)))) (fma.f64 #s(literal -1/5040 binary64) (-.f64 #s(literal 1 binary64) x) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))) (*.f64 #s(literal 1/120 binary64) (-.f64 #s(literal 1 binary64) x)))))) (*.f64 #s(literal -1/6 binary64) (-.f64 #s(literal 1 binary64) x))))) x) B))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (/.f64 (*.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64))) B))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (/.f64 (fma.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 B B) (*.f64 x (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))))))) B))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (/.f64 (fma.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 B B) (fma.f64 x (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (*.f64 x (+.f64 #s(literal 1/45 binary64) (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))))))))) B))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (/.f64 (fma.f64 x (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 B B) (fma.f64 x (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (fma.f64 x (+.f64 #s(literal 1/45 binary64) (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (*.f64 x (+.f64 #s(literal 2/945 binary64) (*.f64 #s(literal 31/15120 binary64) (pow.f64 x #s(literal -1 binary64))))))))))) B))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) B))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) B))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/45 binary64) (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))))))) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) B))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/45 binary64) (fma.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 (*.f64 B B) (+.f64 #s(literal 2/945 binary64) (*.f64 #s(literal 31/15120 binary64) (pow.f64 x #s(literal -1 binary64)))))))))) (pow.f64 x #s(literal -1 binary64))) #s(literal 1 binary64)) B))
#s(approx (/ (cos B) (sin B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (cos B) #s(literal 1 binary64))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 B B))))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 B B)) #s(literal 1/2 binary64)))))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 B B)))) #s(literal 1/2 binary64)))))
#s(approx (pow (* x (sin B)) -1) (pow.f64 (*.f64 B x) #s(literal -1 binary64)))
#s(approx (pow (* x (sin B)) -1) (/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 B B) x) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (pow (* x (sin B)) -1) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal 7/360 binary64) (/.f64 (*.f64 B B) x) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (pow (* x (sin B)) -1) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 31/15120 binary64) (/.f64 (*.f64 B B) x) (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (* x (sin B)) (*.f64 B x))
#s(approx (* x (sin B)) (*.f64 B (+.f64 x (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 B B) x)))))
#s(approx (* x (sin B)) (*.f64 B (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) x (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 B B) x)))))))
#s(approx (* x (sin B)) (*.f64 B (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/120 binary64) x))))))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64))))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) B))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (+.f64 (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64))))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) B))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 #s(literal 1/120 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (+.f64 (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x)) (fma.f64 #s(literal -2/45 binary64) (*.f64 x x) (fma.f64 #s(literal -1/5040 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)))))) (*.f64 #s(literal -1/720 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (fma.f64 #s(literal -1/720 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/5040 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (+.f64 (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))))) (/.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))))) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (fma.f64 #s(literal -1/2 binary64) (/.f64 x (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal -1 binary64))))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) B))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (*.f64 B (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) B))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) B))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x)) (fma.f64 #s(literal -2/45 binary64) (*.f64 x x) (fma.f64 #s(literal -1/5040 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)))))) (*.f64 #s(literal -1/720 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x)) (*.f64 (-.f64 (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (fma.f64 #s(literal 1/120 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) (*.f64 #s(literal 1/3 binary64) (*.f64 x x)))) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal -1/6 binary64) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) B))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -61/240 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 x x)) (*.f64 #s(literal -1/720 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x)) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (-.f64 (*.f64 #s(literal 7/8 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x)))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x))) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x) #s(literal 2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal 3 binary64))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 B B) (pow.f64 x #s(literal 3 binary64))) (pow.f64 x #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -3/2 binary64) (pow.f64 x #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 B B) (pow.f64 x #s(literal 3 binary64))))) (pow.f64 x #s(literal 3 binary64)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -3/2 binary64) (pow.f64 x #s(literal 3 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 B B) (pow.f64 x #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 x #s(literal 3 binary64)))))) (pow.f64 x #s(literal 3 binary64)))))
#s(approx (pow (* (cos B) x) 3) (pow.f64 x #s(literal 3 binary64)))
#s(approx (pow (* (cos B) x) 3) (fma.f64 #s(literal -3/2 binary64) (*.f64 (*.f64 B B) (pow.f64 x #s(literal 3 binary64))) (pow.f64 x #s(literal 3 binary64))))
#s(approx (pow (* (cos B) x) 3) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -3/2 binary64) (pow.f64 x #s(literal 3 binary64)) (*.f64 #s(literal 7/8 binary64) (*.f64 (*.f64 B B) (pow.f64 x #s(literal 3 binary64))))) (pow.f64 x #s(literal 3 binary64))))
#s(approx (pow (* (cos B) x) 3) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -3/2 binary64) (pow.f64 x #s(literal 3 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal -61/240 binary64) (*.f64 (*.f64 B B) (pow.f64 x #s(literal 3 binary64))) (*.f64 #s(literal 7/8 binary64) (pow.f64 x #s(literal 3 binary64)))))) (pow.f64 x #s(literal 3 binary64))))
#s(approx (* (cos B) x) x)
#s(approx (* (cos B) x) (+.f64 x (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 B B) x))))
#s(approx (* (cos B) x) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 B B) x))))))
#s(approx (* (cos B) x) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/24 binary64) x)))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 x x)) x))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 x x))) x))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x)))) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 x x))) x))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 x x)) (*.f64 #s(literal -1/720 binary64) x)))) (*.f64 #s(literal 1/24 binary64) x)))) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 x x))) x))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (-.f64 (*.f64 x x) x))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 x x)) x))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (*.f64 #s(literal 1/24 binary64) x)))) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 x x)) x))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 x x)) (*.f64 #s(literal -1/720 binary64) x)))) (*.f64 #s(literal 1/24 binary64) x)))) (*.f64 #s(literal -1/2 binary64) x)) (*.f64 x x)) x))
#s(approx (* (* (cos B) x) (* (cos B) x)) (*.f64 x x))
#s(approx (* (* (cos B) x) (* (cos B) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 x x)))
#s(approx (* (* (cos B) x) (* (cos B) x)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)))) (*.f64 x x)))
#s(approx (* (* (cos B) x) (* (cos B) x)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 x x))))) (*.f64 x x)))
#s(approx (* 1 (* (cos B) x)) x)
#s(approx (* 1 (* (cos B) x)) (+.f64 x (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 B B) x))))
#s(approx (* 1 (* (cos B) x)) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 B B) x))))))
#s(approx (* 1 (* (cos B) x)) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/24 binary64) x)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))))) (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -4/9 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 17/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (fma.f64 #s(literal 2/135 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -2/3 binary64) (/.f64 (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal -34/135 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 62/315 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (fma.f64 #s(literal -1/9 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -4/9 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 17/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -4/9 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (fma.f64 #s(literal 17/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))) (-.f64 (*.f64 x x) (/.f64 (*.f64 F F) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) #s(literal 2 binary64))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))))) (/.f64 (*.f64 F F) (*.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) (-.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/315 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -41/3024 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 13/60 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)))))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))))) (fma.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) B))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) B))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/315 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) B))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 x (*.f64 B (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 B B) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (/.f64 x (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 B (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 B (fma.f64 (*.f64 B B) (*.f64 (*.f64 F F) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 B (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (*.f64 (*.f64 F F) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (*.f64 (*.f64 F F) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 B (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (*.f64 (*.f64 F F) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (*.f64 (*.f64 F F) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)))) (*.f64 (*.f64 F F) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 B (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) #s(literal 1 binary64))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 B (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))))) #s(literal 1/6 binary64)))) #s(literal 1 binary64))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 B (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64)))))) #s(literal 7/360 binary64))))) #s(literal 1/6 binary64)))) #s(literal 1 binary64))))
#s(approx (pow (sin B) 2) (*.f64 B B))
#s(approx (pow (sin B) 2) (*.f64 (*.f64 B B) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B)))))
#s(approx (pow (sin B) 2) (*.f64 (*.f64 B B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64))))))
#s(approx (pow (sin B) 2) (*.f64 (*.f64 B B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 B B)))) #s(literal 1/3 binary64))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) B))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))) #s(literal 1 binary64)) B))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)))) #s(literal 1/6 binary64)))) #s(literal 1 binary64)) B))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64)))) #s(literal 7/360 binary64)))) #s(literal 1/6 binary64)))) #s(literal 1 binary64)) B))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))) B))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) B))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))))))))) B))
#s(approx (/ (* x (cos B)) (sin B)) (/.f64 x B))
#s(approx (/ (* x (cos B)) (sin B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))) B))
#s(approx (/ (* x (cos B)) (sin B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))))) (*.f64 #s(literal -1/6 binary64) x)))) B))
#s(approx (/ (* x (cos B)) (sin B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/24 binary64) x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))))) (*.f64 #s(literal -1/6 binary64) x)))) B))
#s(approx (* x (cos B)) x)
#s(approx (* x (cos B)) (+.f64 x (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 B B) x))))
#s(approx (* x (cos B)) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 B B) x))))))
#s(approx (* x (cos B)) (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/2 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/24 binary64) x)))))))
#s(approx (pow (sin B) -1) (pow.f64 B #s(literal -1 binary64)))
#s(approx (pow (sin B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))) B))
#s(approx (pow (sin B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 B B))))) B))
#s(approx (pow (sin B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 B B))))))) B))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/315 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) B))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal 2 binary64) (*.f64 B (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) B))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) B))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 F F)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))) B))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (/.f64 (*.f64 x x) (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))))) #s(literal 31/15120 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (pow (* x (cos B)) 2) (*.f64 x x))
#s(approx (pow (* x (cos B)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 x x)))
#s(approx (pow (* x (cos B)) 2) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)))) (*.f64 x x)))
#s(approx (pow (* x (cos B)) 2) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 x x))))) (*.f64 x x)))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -41/3024 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 13/60 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)))))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) B))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) B) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) B))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) B))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -41/3024 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 13/60 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)))))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (fma.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (*.f64 F (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal 2 binary64)))) B))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (*.f64 B (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) B))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) B))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -41/3024 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 13/60 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)))))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 13/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 (*.f64 x x) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) B))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 x x)) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64))))))) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 x x)) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 x x)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 x x)) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64))))) (fma.f64 #s(literal -1/315 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))))))))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64))))))) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 x x) #s(literal 1 binary64)))) (*.f64 x x)) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (- (pow (* x (cos B)) 2) 1) (-.f64 (*.f64 x x) #s(literal 1 binary64)))
#s(approx (- (pow (* x (cos B)) 2) 1) (-.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 x x)) #s(literal 1 binary64)))
#s(approx (- (pow (* x (cos B)) 2) 1) (-.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)))) (*.f64 x x)) #s(literal 1 binary64)))
#s(approx (- (pow (* x (cos B)) 2) 1) (-.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 x x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (*.f64 B x) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 x x))))) (*.f64 x x)) #s(literal 1 binary64)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) B))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) B))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) B))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/5040 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) B))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 B B)))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 B B) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 B B)))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 B B)))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) #s(literal 31/15120 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 B B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (pow.f64 (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x)))) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal -1 binary64))) B))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))) (*.f64 #s(literal 2/45 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal -1 binary64))) B))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 31/15120 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))))) (fma.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))))) (fma.f64 #s(literal -1/315 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) (*.f64 #s(literal 2/45 binary64) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))) (/.f64 (fma.f64 (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))) (*.f64 #s(literal 2/45 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))) (*.f64 #s(literal 2/45 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)))) (*.f64 #s(literal 2/45 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal -1/3 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x))))) (-.f64 (*.f64 x x) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) #s(literal -1 binary64))) B))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) B))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))) B))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))))))))))) B))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (*.f64 (*.f64 B B) (+.f64 #s(literal 31/15120 binary64) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/720 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) x) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 #s(literal 1/120 binary64) x))) (fma.f64 #s(literal -1/5040 binary64) x (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) x) (*.f64 #s(literal -1/6 binary64) x))))))))))))))))) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (* x (/ 1 (tan B)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* x (/ 1 (tan B))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (tan B) (tan.f64 B))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (sin B) (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))
#s(approx (/ (cos B) (sin B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (cos B) (cos.f64 B))
#s(approx (pow (* x (sin B)) -1) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(approx (* x (sin B)) (*.f64 x (sin.f64 B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 3 binary64))) (*.f64 (sin.f64 B) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))) (*.f64 x (cos.f64 B)))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 3 binary64))) (*.f64 (sin.f64 B) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))) (*.f64 x (cos.f64 B))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 3 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))) (*.f64 x (cos.f64 B)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 3 binary64))))
#s(approx (pow (* (cos B) x) 3) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 3 binary64)))
#s(approx (* (cos B) x) (*.f64 x (cos.f64 B)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64))) (*.f64 x (cos.f64 B))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 x (cos.f64 B))))
#s(approx (* (* (cos B) x) (* (cos B) x)) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)))
#s(approx (* 1 (* (cos B) x)) (*.f64 x (cos.f64 B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F)))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (pow (sin B) 2) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* -1 (/ (* x (cos B)) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (* x (cos B)) (sin B)) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (* x (cos B)) (*.f64 x (cos.f64 B)))
#s(approx (pow (sin B) -1) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (pow (* x (cos B)) 2) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (- (pow (* x (cos B)) 2) 1) (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (*.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal -1 binary64))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx x x)
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 x (fma.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))) (*.f64 #s(literal 3/2 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))) (*.f64 x (fma.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)) #s(literal 1/4 binary64)))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)) #s(literal 1/4 binary64)) x) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)) #s(literal 1/4 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 x (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 5/8 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -9 binary64)) #s(literal 1/4 binary64)) x))) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)) #s(literal 1/4 binary64))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (fma.f64 x (fma.f64 #s(literal -1/2 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)) #s(literal 1/4 binary64)) (*.f64 x (fma.f64 #s(literal -15/16 binary64) (*.f64 (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -13 binary64)) #s(literal 1/4 binary64)) x) (*.f64 #s(literal 5/8 binary64) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -9 binary64)) #s(literal 1/4 binary64)))))) (pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)) #s(literal 1/4 binary64))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (+.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (-.f64 (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (-.f64 (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (fma.f64 x (*.f64 (cos.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (fma.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (cos.f64 B) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) #s(literal 1 binary64))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (cos.f64 B))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (cos.f64 B) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (cos.f64 B))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) #s(literal 1 binary64))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) #s(literal 1 binary64))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 x (cos.f64 B)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (+.f64 #s(literal 1 binary64) (*.f64 x (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (cos.f64 B)))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (*.f64 #s(literal -1 binary64) (*.f64 x (cos.f64 B))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (*.f64 x (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (cos.f64 B))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 x (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 x (-.f64 (*.f64 #s(literal -8 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64))))) (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 B) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) F) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (-.f64 (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (-.f64 (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (-.f64 (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 B) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))))))))))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 F F) (sin.f64 B))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B)))))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))))))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (/.f64 x (*.f64 (*.f64 F F) (sin.f64 B)))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 x (/.f64 (-.f64 (*.f64 x (cos.f64 B)) #s(literal 1 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B)))))) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 x (/.f64 (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (*.f64 (*.f64 F F) (sin.f64 B)))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B)))))) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) (sin.f64 B))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) (sin.f64 B)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (fma.f64 #s(literal -1 binary64) (sin.f64 B) (*.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 F F) (sin.f64 B))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))))))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 F F) (sin.f64 B))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) (*.f64 #s(literal -2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 x (*.f64 F F)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))))) (*.f64 #s(literal -2 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (sin.f64 B))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (sin.f64 B)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 4 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 x (-.f64 (*.f64 x (/.f64 (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 5 binary64))) (pow.f64 (cos.f64 B) #s(literal 4 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 x (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))))) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 B) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 F F) (sin.f64 B))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 x (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 B) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B)))))))))))) (fma.f64 #s(literal -2 binary64) (*.f64 (cos.f64 B) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (*.f64 (*.f64 F F) (sin.f64 B))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 B) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) (/.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 F F)) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64)))))
#s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))
#s(approx (+ 2 (* 2 x)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (* 2 x) (*.f64 #s(literal 2 binary64) x))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (*.f64 #s(literal -2 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (-.f64 (*.f64 x (-.f64 (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 B) (-.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (*.f64 #s(literal -2 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (- (pow (* x (cos B)) 2) 1) #s(literal -1 binary64))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (fma.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x (cos.f64 B)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (fma.f64 x (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (-.f64 (*.f64 x (cos.f64 B)) #s(literal 1 binary64)) (sin.f64 B)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (-.f64 (*.f64 x (-.f64 (*.f64 x (/.f64 (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 x (-.f64 (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (+.f64 #s(literal 2 binary64) (*.f64 F F))) x))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (+.f64 #s(literal 2 binary64) (*.f64 F F))) x) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (fma.f64 #s(literal 1/128 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))))) (*.f64 x x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (+.f64 #s(literal 2 binary64) (*.f64 F F))) x) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (fma.f64 #s(literal -1/64 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3072 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 #s(literal 1/2 binary64)) (neg.f64 (log.f64 x)))) (fma.f64 #s(literal 1/128 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))))) (*.f64 x x))))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 x (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64)) (/.f64 (*.f64 F F) x)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (*.f64 x (cos.f64 B)))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64)))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 3 binary64)))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (*.f64 (pow.f64 x #s(literal 3 binary64)) (+.f64 (pow.f64 x #s(literal -3 binary64)) (pow.f64 (cos.f64 B) #s(literal 3 binary64)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) x) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (*.f64 (*.f64 x x) (-.f64 (+.f64 (pow.f64 x #s(literal -2 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (/.f64 (cos.f64 B) x))))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)))
#s(approx (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) x) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 F F) #s(literal 1/2 binary64)) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 F F) #s(literal 1/2 binary64)) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 x)) (*.f64 (/.f64 (pow.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 x x)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 x x)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) (pow.f64 x #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) #s(literal -1 binary64)) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))))))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) #s(literal -1 binary64)))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B)))) #s(literal -1 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) #s(literal -1 binary64)))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 F F) (sin.f64 B)) x)))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) (sin.f64 B)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 B) x)))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 x x)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))) x))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) #s(literal -1 binary64))))) x))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (/.f64 x (*.f64 (*.f64 F F) (sin.f64 B))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 x (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 x (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 x x)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 x (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 x x)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) (pow.f64 x #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))))) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (sin.f64 B)))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (sin.f64 B))))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 x x)) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (sin.f64 B)))))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 x (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 x (sin.f64 B)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 (pow.f64 x #s(literal 3 binary64)) (cos.f64 B))) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 (*.f64 x x) (cos.f64 B))) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))))))))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) (*.f64 #s(literal 2 binary64) (/.f64 x (*.f64 F F))))
#s(approx (/ (+ 2 (* 2 x)) (* F F)) (*.f64 x (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) x) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64))))))
#s(approx (+ 2 (* 2 x)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (-.f64 (+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (/.f64 #s(literal 2 binary64) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (-.f64 (+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (*.f64 (*.f64 x x) (-.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (- (pow (* x (cos B)) 2) 1) (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)))
#s(approx (- (pow (* x (cos B)) 2) 1) (*.f64 (*.f64 x x) (-.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 x #s(literal -2 binary64)))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (sin.f64 B)))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 x (sin.f64 B))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 x (sin.f64 B))) (+.f64 (pow.f64 (*.f64 (*.f64 x x) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (*.f64 (*.f64 x x) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (*.f64 (*.f64 x x) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 B) (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (+.f64 (pow.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (-.f64 (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (-.f64 (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (/.f64 (-.f64 (+.f64 (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (pow.f64 x #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 x)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow (+ (* 2 x) (+ (* F F) 2)) -1/4)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 x) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (+.f64 #s(literal 2 binary64) (*.f64 F F))) x))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (fma.f64 #s(literal 1/128 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))))) x) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (+.f64 #s(literal 2 binary64) (*.f64 F F))))) x))))
#s(approx (pow (+ (* 2 x) (+ (* F F) 2)) -1/4) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (fma.f64 #s(literal 1/3072 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/64 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))))))) x) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (fma.f64 #s(literal 1/128 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64)))))))) x) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) x)))) (+.f64 #s(literal 2 binary64) (*.f64 F F))))) x))))
#s(approx (+ (* 2 x) (+ (* F F) 2)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) x)) #s(literal 2 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (* x (+ (* -1 (/ (cos B) (sin B))) (pow (* x (sin B)) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (neg (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (/ (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (sin B)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (+ 1 (pow (* (cos B) x) 3)) (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x))))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (+ 1 (pow (* (cos B) x) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (pow.f64 x #s(literal -3 binary64))))))
#s(approx (+ 1 (- (* (* (cos B) x) (* (cos B) x)) (* 1 (* (cos B) x)))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) x) (+.f64 (pow.f64 x #s(literal -2 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 F F) #s(literal -1/2 binary64)) (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 F #s(literal 3 binary64)) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3/2 binary64))) (sin.f64 B))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 x))))) x)) (*.f64 (/.f64 (*.f64 F F) x) (/.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 B) (sin.f64 B))))) x)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))) x) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))) x) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (- (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))) x) (+.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (* 2 (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))
#s(approx (/ x (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B)))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x)) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))))
#s(approx (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (*.f64 (*.f64 F F) (sin.f64 B)) x)))))
#s(approx (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 (cos.f64 B) (sin.f64 B) (/.f64 (sin.f64 B) x)))))
#s(approx (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64))) x) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) #s(literal -1 binary64)))) x)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) #s(literal -1 binary64)))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x)))
#s(approx (/ 2 (* (* F F) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B)))) #s(literal -1 binary64)))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x)))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (pow (* x (cos B)) 2) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))) x)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (* 1/2 (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))))) (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64))) x) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)))) x) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))) x)) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))))
#s(approx (* (/ (+ 2 (* 2 x)) (* F F)) (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) (cos.f64 B)) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))))) x) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) (cos.f64 B)))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 F F) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))) x)) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)))))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64)))) x) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (sin B) (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2)) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))) x) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))
#s(approx (pow (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) 2) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (cos.f64 B) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (pow.f64 (*.f64 x (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal -1 binary64))) x) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x)))
#s(approx (pow (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) -1) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x) (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64))) x) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x)))
#s(approx (/ (/ (- (pow (* x (cos B)) 2) 1) (pow (sin B) 2)) (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (* -1 (/ (* x (cos B)) (sin B))) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))

eval294.0ms (1.6%)

Memory
43.3MiB live, 510.1MiB allocated; 47ms collecting garbage
Compiler

Compiled 287 629 to 9 096 computations (96.8% saved)

prune9.6s (53.2%)

Memory
68.7MiB live, 14 228.1MiB allocated; 892ms collecting garbage
Pruning

10 alts after pruning (1 fresh and 9 done)

PrunedKeptTotal
New1 58701 587
Fresh011
Picked055
Done044
Total1 587101 597
Accuracy
100.0%
Counts
1 597 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.5%
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
48.6%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
78.2%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
49.4%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
27.6%
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
20.6%
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
57.1%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
34.2%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
58.8%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
53.0%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Compiler

Compiled 720 to 329 computations (54.3% saved)

series145.0ms (0.8%)

Memory
2.2MiB live, 144.2MiB allocated; 4ms collecting garbage
Counts
35 → 302
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(tan.f64 B)
B
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
(*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))
F
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(sin.f64 B)
#s(literal -1 binary64)
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))
(*.f64 F F)
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))
#s(literal -3 binary64)
(*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))
#s(literal 3/8 binary64)
(*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))
(/.f64 (*.f64 F F) (sin.f64 B))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))
#s(literal -5 binary64)
Outputs
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx F #s(hole binary64 F))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (pow F 2) (sin B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* 3/8 (* (/ (pow F 5) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (pow F 5) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (pow F 5) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (+ (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (/ 1 (* (pow F 4) (sin B))) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* 3/8 (* (/ (pow F 4) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (pow F 4) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (pow F 4) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (+ (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (/ 1 (* (pow F 4) (sin B))) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* 3/8 (* (/ (pow F 4) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* (pow F 4) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* (pow F 2) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* -1 (* (pow F 5) (+ (* -3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* -1 (* (pow F 5) (+ (* -1 (* (/ 1 (* (pow F 4) (sin B))) (sqrt (/ 1 (+ 2 (* 2 x)))))) (+ (* -3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (+ (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (* F (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (+ (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (+ (* F (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow B 2) (* F (+ (* 31/15120 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (+ (* (pow B 2) (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (+ (* (pow B 2) (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (+ (* (pow B 2) (+ (* 31/15120 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))) B)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* (pow B 2) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (+ (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))))) B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))) (* 1/6 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/6 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))) (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* 31/15120 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 7/360 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))) B)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* 1/16 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))) B)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (* (pow B 2) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -3/8 (* (* (pow B 2) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))) B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/6 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))) (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 1/6 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -1 (* (* (pow B 2) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (pow F 2) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (+ (* 1/6 (* (pow B 2) (pow F 2))) (pow F 2)) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -1/6 (pow F 2)))) (pow F 2)) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -1/6 (pow F 2)))) (pow F 2)) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* x 1) #s(hole binary64 x))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* F (* x (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2))))))) (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))) (* x (+ (* F (* x (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))))))))) (* F (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))) (* x (+ (* F (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (* x (+ (* F (* x (+ (* -1/2 (/ (+ 1/2 (* -1/4 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))))))) (* F (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* x (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* x (- (+ (* x (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* x (- (+ (* x (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (+ (* x (+ (* -1/2 (/ (+ 1/2 (* -1/4 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))))))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (/ x (sqrt 1/2))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (sqrt 1/2) (* x (- (* 1/2 (/ (* x (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* 1/4 (/ 1 (sqrt 1/2))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (sqrt 1/2) (* x (- (* x (+ (* -1/2 (/ (* x (+ 1/2 (* -1/4 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))))) (* 1/4 (/ 1 (sqrt 1/2))))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (+ 1/2 (* -1/2 x))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (+ 1/2 (* x (- (* 1/2 x) 1/2)))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (+ 1/2 (* x (- (* x (+ 1/2 (* -1/2 x))) 1/2)))))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 2))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (+ (* (pow F 2) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))) (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (+ (* x (+ (* (pow F 2) (* x (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))))) (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (+ (* x (+ (* x (+ (* (pow F 2) (* x (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))))) (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (+ (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))) (* x (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (+ (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))) (* x (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (+ (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* x (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))))))))))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (sqrt 1/8) (sin B))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (+ (* -3/16 (/ x (* (sin B) (sqrt 1/8)))) (/ (sqrt 1/8) (sin B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (+ (* x (- (* 1/2 (/ (* x (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2))))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ 1 (* (sin B) (sqrt 1/8)))))) (/ (sqrt 1/8) (sin B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (+ (* x (- (* x (+ (* -1/2 (/ (* x (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2))))) (* (sin B) (sqrt 1/8)))) (* 1/2 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))))) (* 3/16 (/ 1 (* (sin B) (sqrt 1/8)))))) (/ (sqrt 1/8) (sin B)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (sqrt 1/8)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (+ (sqrt 1/8) (* -3/16 (/ x (sqrt 1/8))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (+ (sqrt 1/8) (* x (- (* 1/2 (/ (* x (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2))))) (sqrt 1/8))) (* 3/16 (/ 1 (sqrt 1/8))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (+ (sqrt 1/8) (* x (- (* x (+ (* -1/2 (/ (* x (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2))))) (sqrt 1/8))) (* 1/2 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (sqrt 1/8))))) (* 3/16 (/ 1 (sqrt 1/8))))))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 1/8))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (+ 1/8 (* -3/8 x))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (+ 1/8 (* x (- (* 3/4 x) 3/8)))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (+ 1/8 (* x (- (* x (+ 3/4 (* -5/4 x))) 3/8)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (+ (* -15/512 (/ (* (pow F 2) x) (* (sin B) (sqrt 1/32)))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/16 (/ (* (pow F 2) (* x (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* x (+ (* -3/16 (/ (* (pow F 2) (* x (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (+ (* -5/64 (/ (* (pow F 2) x) (* (sin B) (sqrt 1/32)))) (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (+ (* x (+ (* -5/64 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 1/2 (/ (* (pow F 2) (* x (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))))) (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (+ (* x (+ (* -5/64 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* x (+ (* -1/2 (/ (* (pow F 2) (* x (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))) (* 1/2 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))) (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (sqrt 1/32)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (+ (sqrt 1/32) (* -5/64 (/ x (sqrt 1/32))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (+ (sqrt 1/32) (* x (- (* 1/2 (/ (* x (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (sqrt 1/32))) (* 5/64 (/ 1 (sqrt 1/32))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (+ (sqrt 1/32) (* x (- (* x (+ (* -1/2 (/ (* x (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (sqrt 1/32))) (* 1/2 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (sqrt 1/32))))) (* 5/64 (/ 1 (sqrt 1/32))))))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 1/32))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (+ 1/32 (* -5/32 x))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (+ 1/32 (* x (- (* 15/32 x) 5/32)))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (+ 1/32 (* x (- (* x (+ 15/32 (* -35/32 x))) 5/32)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 3) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 3) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))) (/ (* F (+ (* -1/4 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/2))))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 3) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))) (+ (/ (* F (+ (* -1/4 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/2))))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2)) (/ (* F (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt x))) (* 1/4 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/2))))))) (pow x 3)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/2))))) (+ (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/2))))) (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/2))))) (+ (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B))))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 1/2 (* 1/16 (/ x (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ 1/2 x)))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ (- 1/2 (* 1/2 (/ 1 x))) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ (- (+ 1/2 (/ 1/2 (pow x 2))) (* 1/2 (/ 1 x))) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ (- (+ 1/2 (/ 1/2 (pow x 2))) (+ (* 1/2 (/ 1 x)) (* 1/2 (/ 1 (pow x 3))))) x)))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* x (+ 2 (* 2 (/ 1 x))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 x)))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3)))))) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 x)))) (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))))) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 x)))) (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt (/ 1 (pow x 3))))) (+ (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (* (pow F 2) (+ (* -3/16 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/8))))) (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt x))))) (pow x 3))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1/2 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt 1/8) (sin B))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3)))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) (+ (* 3/32 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/8))))) (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (+ (* 3/32 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))))))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt 1/8) (sin B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/8))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B))))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 5/4 (* 9/256 (/ x (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/8))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* (sqrt (/ 1 (pow x 3))) (sqrt 1/8))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/8)))) (* (sqrt (/ 1 x)) (sqrt 1/8))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/8)))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/8)))) (* (sqrt (/ 1 x)) (sqrt 1/8)))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 5/4 (* 9/256 (/ x (pow (sqrt 1/8) 2)))) (sqrt 1/8)))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/8)))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/8)))) (* (sqrt (/ 1 x)) (sqrt 1/8))))) x)))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ 1/8 (pow x 3))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ (- 1/8 (* 3/8 (/ 1 x))) (pow x 3))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ (- (+ 1/8 (/ 3/4 (pow x 2))) (* 3/8 (/ 1 x))) (pow x 3))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ (- (+ 1/8 (/ 3/4 (pow x 2))) (+ (* 3/8 (/ 1 x)) (* 5/4 (/ 1 (pow x 3))))) (pow x 3))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5)))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 45/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -3/16 (* (/ (* (pow F 2) (+ 35/32 (* 25/4096 (/ x (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 7))))) (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 45/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x))))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 15/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (+ 35/32 (* 25/4096 (/ x (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 7))))) (+ (* -5/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 15/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (* (sqrt (/ 1 (pow x 5))) (sqrt 1/32))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/32)))) (* (sqrt (/ 1 x)) (sqrt 1/32))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/32)))) (+ (* 15/64 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/32)))) (* (sqrt (/ 1 x)) (sqrt 1/32)))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 35/32 (* 25/4096 (/ x (pow (sqrt 1/32) 2)))) (sqrt 1/32)))) (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/32)))) (+ (* 15/64 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/32)))) (* (sqrt (/ 1 x)) (sqrt 1/32))))) (pow x 2))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ 1/32 (pow x 5))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ (- 1/32 (* 5/32 (/ 1 x))) (pow x 5))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ (- (+ 1/32 (/ 15/32 (pow x 2))) (* 5/32 (/ 1 x))) (pow x 5))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ (- (+ 1/32 (/ 15/32 (pow x 2))) (+ (* 5/32 (/ 1 x)) (* 35/32 (/ 1 (pow x 3))))) (pow x 5))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow F 3) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* F (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) x)) (* -1/2 (* (/ (* (pow F 3) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* F (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt x))))) x)) (* F (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))))) x)) (* -1/2 (* (/ (* (pow F 3) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt x)))) x)) (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 1/2 (* -1/16 (/ x (pow (sqrt -1/2) 2))))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) 1/2) x))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) 1/2) x)) 1/2) x))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* 1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x)))) (* -3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 3)))))) x))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt (/ 1 x)))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow F 2) (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 3/16 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))))) x)) (* 3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt x)))) x)) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B)))) (* -3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 3)))))) x))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/32 (* (sqrt (/ 1 x)) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 3/16 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8)))))) x)) (* 3/32 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8)))))) x)) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B)))) x))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/8 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 5/4 (* -9/256 (/ x (pow (sqrt -1/8) 2))))) (* (sin B) (sqrt -1/8)))))) (pow x 3))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (* (sqrt (/ 1 (pow x 3))) (* (sqrt -1) (sqrt -1/8))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/8)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/8)))) x))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/8)))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -1/8)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/8))))) x))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/8 (* (sqrt x) (/ (sqrt -1) (sqrt -1/8)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 5/4 (* -9/256 (/ x (pow (sqrt -1/8) 2))))) (sqrt -1/8))))) (pow x 3))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/8)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/8))))) x))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (* -1 (/ (- (* 3/8 (/ 1 x)) 1/8) (pow x 3)))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* 3/4 (/ 1 x)) 3/8) x)) 1/8) (pow x 3)))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 5/4 (/ 1 x)) 3/4) x)) 3/8) x)) 1/8) (pow x 3)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 5)))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 45/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 5))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -45/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 3/16 (* (/ (* (pow F 2) (* (sqrt -1) (+ 35/32 (* -25/4096 (/ x (pow (sqrt -1/32) 2)))))) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 5))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 15/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 5))))) (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -15/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 1/2 (* (/ (* (pow F 2) (* (sqrt -1) (+ 35/32 (* -25/4096 (/ x (pow (sqrt -1/32) 2)))))) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -5/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (* (sqrt (/ 1 (pow x 5))) (* (sqrt -1) (sqrt -1/32)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/32)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/32)))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/32)))) (+ (* 15/64 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -1/32)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/32))))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -15/64 (* (sqrt x) (/ (sqrt -1) (sqrt -1/32)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 35/32 (* -25/4096 (/ x (pow (sqrt -1/32) 2))))) (sqrt -1/32))))) (pow x 3))) (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/32)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/32))))) (pow x 2))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (* -1 (/ (- (* 5/32 (/ 1 x)) 1/32) (pow x 5)))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* 15/32 (/ 1 x)) 5/32) x)) 1/32) (pow x 5)))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 35/32 (/ 1 x)) 15/32) x)) 5/32) x)) 1/32) (pow x 5)))))
Calls

9 calls:

TimeVariablePointExpression
39.0ms
B
@inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (pow (sin B) -1) (sin B) -1 (sqrt (pow (+ 2 (* 2 x)) -1)) (pow (+ 2 (* 2 x)) -1) (+ 2 (* 2 x)) 2 (* 2 x) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (sqrt (pow (+ 2 (* 2 x)) -3)) (pow (+ 2 (* 2 x)) -3) -3 (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)) (pow (+ 2 (* 2 x)) -5) -5)
37.0ms
x
@inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (pow (sin B) -1) (sin B) -1 (sqrt (pow (+ 2 (* 2 x)) -1)) (pow (+ 2 (* 2 x)) -1) (+ 2 (* 2 x)) 2 (* 2 x) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (sqrt (pow (+ 2 (* 2 x)) -3)) (pow (+ 2 (* 2 x)) -3) -3 (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)) (pow (+ 2 (* 2 x)) -5) -5)
14.0ms
x
@-inf
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (pow (sin B) -1) (sin B) -1 (sqrt (pow (+ 2 (* 2 x)) -1)) (pow (+ 2 (* 2 x)) -1) (+ 2 (* 2 x)) 2 (* 2 x) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (sqrt (pow (+ 2 (* 2 x)) -3)) (pow (+ 2 (* 2 x)) -3) -3 (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)) (pow (+ 2 (* 2 x)) -5) -5)
14.0ms
x
@0
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (pow (sin B) -1) (sin B) -1 (sqrt (pow (+ 2 (* 2 x)) -1)) (pow (+ 2 (* 2 x)) -1) (+ 2 (* 2 x)) 2 (* 2 x) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (sqrt (pow (+ 2 (* 2 x)) -3)) (pow (+ 2 (* 2 x)) -3) -3 (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)) (pow (+ 2 (* 2 x)) -5) -5)
7.0ms
F
@0
((+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (pow (sin B) -1) (sin B) -1 (sqrt (pow (+ 2 (* 2 x)) -1)) (pow (+ 2 (* 2 x)) -1) (+ 2 (* 2 x)) 2 (* 2 x) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (sqrt (pow (+ 2 (* 2 x)) -3)) (pow (+ 2 (* 2 x)) -3) -3 (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)) (pow (+ 2 (* 2 x)) -5) -5)

rewrite188.0ms (1%)

Memory
-10.0MiB live, 223.5MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0185719949
0191317893
0887217316
Stop Event
iter limit
node limit
iter limit
Counts
337 → 387
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(tan.f64 B)
B
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))
(*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))
F
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(sin.f64 B)
#s(literal -1 binary64)
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))
(*.f64 F F)
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))
#s(literal -3 binary64)
(*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))
#s(literal 3/8 binary64)
(*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))
(/.f64 (*.f64 F F) (sin.f64 B))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))
#s(literal -5 binary64)
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* -5/16 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* F (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* F (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))
#s(approx F #s(hole binary64 F))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* (/ 1 (sin B)) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1/2 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* (pow F 2) (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (pow F 2) (sin B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (/ 1 (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (+ (* -1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* 3/8 (* (/ (pow F 5) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (pow F 5) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (pow F 5) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (+ (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (/ 1 (* (pow F 4) (sin B))) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* 3/8 (* (/ (pow F 4) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (pow F 4) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (pow F 4) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (+ (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (/ 1 (* (pow F 4) (sin B))) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* 3/8 (* (/ (pow F 4) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* (pow F 4) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* 3/8 (* (/ (pow F 2) (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* (pow F 2) (+ (* -1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* (pow F 4) (sin B)))) (* 1/2 (/ (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)) (* (pow F 6) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* -1 (* (pow F 5) (+ (* -3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* -1 (* (pow F 5) (+ (* -1 (* (/ 1 (* (pow F 4) (sin B))) (sqrt (/ 1 (+ 2 (* 2 x)))))) (+ (* -3/8 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/2 (* (/ 1 (* (pow F 2) (sin B))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))))) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))) (+ (* -1/36 F) (* 1/120 F)))) (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (+ (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (* F (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))) B)))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (/ (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (+ (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow B 2) (+ (* F (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow B 2) (* F (+ (* 31/15120 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (+ (* (pow B 2) (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (/ (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (+ (* (pow B 2) (+ (* 7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (+ (* (pow B 2) (+ (* 31/15120 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))) B)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* (pow B 2) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* (pow B 2) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))) B)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (+ (* -7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (* -31/30240 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))))) B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))) (* 1/6 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/6 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))) (* (pow B 2) (+ (* 1/6 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* 31/15120 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 7/360 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))) B)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* 1/16 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))) B)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (* (pow B 2) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))) B)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* 3/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -3/8 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -3/8 (* (* (pow B 2) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))) B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/6 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))) (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 1/6 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* (pow B 2) (+ (* -1 (* (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -1 (* (* (pow B 2) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))))) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))) (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (pow F 2) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (+ (* 1/6 (* (pow B 2) (pow F 2))) (pow F 2)) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -1/6 (pow F 2)))) (pow F 2)) B)))
#s(approx (/ (* F F) (sin B)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/5040 (pow F 2)) (+ (* 1/720 (pow F 2)) (* 1/6 (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2)))))))) (+ (* -1/36 (pow F 2)) (* 1/120 (pow F 2))))) (* -1/6 (pow F 2)))) (pow F 2)) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* (/ 1 (sin B)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* x 1) #s(hole binary64 x))
#s(approx x #s(hole binary64 x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* x (+ (* -1 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F (sin B)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* F (* x (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2))))))) (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))) (* x (+ (* F (* x (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))))))))) (* F (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* F (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))) (* x (+ (* F (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (* x (+ (* F (* x (+ (* -1/2 (/ (+ 1/2 (* -1/4 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))))))) (* F (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* x (- (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* x (- (+ (* x (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* x (- (+ (* x (+ (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (+ (* x (+ (* -1/2 (/ (+ 1/2 (* -1/4 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2)))) (* (sin B) (sqrt 1/2)))) (* (pow F 2) (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))))))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))) (* 1/4 (/ 1 (* (sin B) (sqrt 1/2)))))) (+ (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))) (/ (sqrt 1/2) (sin B))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (/ x (sqrt 1/2))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (sqrt 1/2) (* x (- (* 1/2 (/ (* x (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* 1/4 (/ 1 (sqrt 1/2))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (sqrt 1/2) (* x (- (* x (+ (* -1/2 (/ (* x (+ 1/2 (* -1/4 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (pow (sqrt 1/2) 2))))) (sqrt 1/2))) (* 1/2 (/ (- 1/2 (* 1/16 (/ 1 (pow (sqrt 1/2) 2)))) (sqrt 1/2))))) (* 1/4 (/ 1 (sqrt 1/2))))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 1/2))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (+ 1/2 (* -1/2 x))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (+ 1/2 (* x (- (* 1/2 x) 1/2)))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (+ 1/2 (* x (- (* x (+ 1/2 (* -1/2 x))) 1/2)))))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 2))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (+ (* (pow F 2) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))) (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (+ (* x (+ (* (pow F 2) (* x (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))))) (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (+ (* x (+ (* x (+ (* (pow F 2) (* x (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))))) (* (pow F 2) (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))) (* (pow F 2) (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))))))) (* (pow F 2) (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/32 (/ 1 (* (sin B) (sqrt 1/8))))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (+ (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))) (* x (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (+ (* -1/2 (/ (sqrt 1/8) (sin B))) (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (+ (* 3/32 (/ 1 (* (sin B) (sqrt 1/8)))) (* x (+ (* -1/4 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))) (+ (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* x (+ (* -3/16 (/ (* (pow F 2) (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))) (* 1/4 (/ (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))))))))))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (sqrt 1/8) (sin B))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (+ (* -3/16 (/ x (* (sin B) (sqrt 1/8)))) (/ (sqrt 1/8) (sin B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (+ (* x (- (* 1/2 (/ (* x (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2))))) (* (sin B) (sqrt 1/8)))) (* 3/16 (/ 1 (* (sin B) (sqrt 1/8)))))) (/ (sqrt 1/8) (sin B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (+ (* x (- (* x (+ (* -1/2 (/ (* x (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2))))) (* (sin B) (sqrt 1/8)))) (* 1/2 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8)))))) (* 3/16 (/ 1 (* (sin B) (sqrt 1/8)))))) (/ (sqrt 1/8) (sin B)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (sqrt 1/8)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (+ (sqrt 1/8) (* -3/16 (/ x (sqrt 1/8))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (+ (sqrt 1/8) (* x (- (* 1/2 (/ (* x (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2))))) (sqrt 1/8))) (* 3/16 (/ 1 (sqrt 1/8))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (+ (sqrt 1/8) (* x (- (* x (+ (* -1/2 (/ (* x (+ 5/4 (* -3/16 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (pow (sqrt 1/8) 2))))) (sqrt 1/8))) (* 1/2 (/ (- 3/4 (* 9/256 (/ 1 (pow (sqrt 1/8) 2)))) (sqrt 1/8))))) (* 3/16 (/ 1 (sqrt 1/8))))))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 1/8))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (+ 1/8 (* -3/8 x))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (+ 1/8 (* x (- (* 3/4 x) 3/8)))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (+ 1/8 (* x (- (* x (+ 3/4 (* -5/4 x))) 3/8)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (+ (* -15/512 (/ (* (pow F 2) x) (* (sin B) (sqrt 1/32)))) (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 3/16 (/ (* (pow F 2) (* x (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (+ (* 3/8 (/ (* (pow F 2) (sqrt 1/32)) (sin B))) (* x (+ (* -15/512 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* x (+ (* -3/16 (/ (* (pow F 2) (* x (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))) (* 3/16 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (* (pow F 2) (sqrt 1/32)) (sin B))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (+ (* -5/64 (/ (* (pow F 2) x) (* (sin B) (sqrt 1/32)))) (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (+ (* x (+ (* -5/64 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* 1/2 (/ (* (pow F 2) (* x (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))))) (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (+ (* x (+ (* -5/64 (/ (pow F 2) (* (sin B) (sqrt 1/32)))) (* x (+ (* -1/2 (/ (* (pow F 2) (* x (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2)))))) (* (sin B) (sqrt 1/32)))) (* 1/2 (/ (* (pow F 2) (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32)))))))) (/ (* (pow F 2) (sqrt 1/32)) (sin B)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (sqrt 1/32)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (+ (sqrt 1/32) (* -5/64 (/ x (sqrt 1/32))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (+ (sqrt 1/32) (* x (- (* 1/2 (/ (* x (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2))))) (sqrt 1/32))) (* 5/64 (/ 1 (sqrt 1/32))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (+ (sqrt 1/32) (* x (- (* x (+ (* -1/2 (/ (* x (+ 35/32 (* -5/64 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (pow (sqrt 1/32) 2))))) (sqrt 1/32))) (* 1/2 (/ (- 15/32 (* 25/4096 (/ 1 (pow (sqrt 1/32) 2)))) (sqrt 1/32))))) (* 5/64 (/ 1 (sqrt 1/32))))))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 1/32))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (+ 1/32 (* -5/32 x))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (+ 1/32 (* x (- (* 15/32 x) 5/32)))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (+ 1/32 (* x (- (* x (+ 15/32 (* -35/32 x))) 5/32)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 (pow x 3)))))) (/ (cos B) (sin B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/2 (* (/ (* F (+ (* 1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt 1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3)))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* (sin B) (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 3) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 3) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))) (/ (* F (+ (* -1/4 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/2))))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 3) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x))) (+ (/ (* F (+ (* -1/4 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/2))))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2)) (/ (* F (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt x))) (* 1/4 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/2))))))) (pow x 3)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/2))))) (+ (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3))))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/2))))) (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/2))))) (+ (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/2) (sin B))))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 1/2 (* 1/16 (/ x (pow (sqrt 1/2) 2)))) (sqrt 1/2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/2)))) (* (sqrt (/ 1 x)) (sqrt 1/2)))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ 1/2 x)))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ (- 1/2 (* 1/2 (/ 1 x))) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ (- (+ 1/2 (/ 1/2 (pow x 2))) (* 1/2 (/ 1 x))) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (/ (- (+ 1/2 (/ 1/2 (pow x 2))) (+ (* 1/2 (/ 1 x)) (* 1/2 (/ 1 (pow x 3))))) x)))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (* 2 x)) #s(hole binary64 (* x (+ 2 (* 2 (/ 1 x))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 x)))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3)))))) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 x)))) (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))))) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (sqrt 1/8)) (sin B)) (sqrt (/ 1 x)))) (+ (* 3/32 (* (/ (pow F 2) (* (sin B) (sqrt 1/8))) (sqrt (/ 1 (pow x 3))))) (+ (* 3/8 (* (/ (* (pow F 4) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (* (pow F 2) (+ (* -3/16 (* (sqrt x) (/ 1 (* (sin B) (sqrt 1/8))))) (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt x))))) (pow x 3))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1/2 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt 1/8) (sin B))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3)))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) (+ (* 3/32 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/8))))) (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (+ (* 3/32 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 3))))))))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt 1/8) (sin B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/8))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B))))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 5/4 (* 9/256 (/ x (pow (sqrt 1/8) 2)))) (* (sin B) (sqrt 1/8))))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (* (sin B) (sqrt 1/8))))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (* (sin B) (sqrt 1/8))))) (* (sqrt (/ 1 x)) (/ (sqrt 1/8) (sin B)))))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* (sqrt (/ 1 (pow x 3))) (sqrt 1/8))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/8)))) (* (sqrt (/ 1 x)) (sqrt 1/8))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/8)))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/8)))) (* (sqrt (/ 1 x)) (sqrt 1/8)))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 5/4 (* 9/256 (/ x (pow (sqrt 1/8) 2)))) (sqrt 1/8)))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/8)))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/8)))) (* (sqrt (/ 1 x)) (sqrt 1/8))))) x)))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ 1/8 (pow x 3))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ (- 1/8 (* 3/8 (/ 1 x))) (pow x 3))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ (- (+ 1/8 (/ 3/4 (pow x 2))) (* 3/8 (/ 1 x))) (pow x 3))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (/ (- (+ 1/8 (/ 3/4 (pow x 2))) (+ (* 3/8 (/ 1 x)) (* 5/4 (/ 1 (pow x 3))))) (pow x 3))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5)))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 45/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -3/16 (* (/ (* (pow F 2) (+ 35/32 (* 25/4096 (/ x (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 7))))) (+ (* -15/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 45/512 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* 3/8 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x))))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 (pow x 5))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 15/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -1/2 (* (/ (* (pow F 2) (+ 35/32 (* 25/4096 (/ x (pow (sqrt 1/32) 2))))) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 7))))) (+ (* -5/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 15/64 (* (/ (pow F 2) (* (sin B) (sqrt 1/32))) (sqrt (/ 1 (pow x 5))))) (* (/ (* (pow F 2) (sqrt 1/32)) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (* (sqrt (/ 1 (pow x 5))) (sqrt 1/32))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/32)))) (* (sqrt (/ 1 x)) (sqrt 1/32))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/32)))) (+ (* 15/64 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/32)))) (* (sqrt (/ 1 x)) (sqrt 1/32)))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow x 7))) (/ (+ 35/32 (* 25/4096 (/ x (pow (sqrt 1/32) 2)))) (sqrt 1/32)))) (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ 1 (sqrt 1/32)))) (+ (* 15/64 (* (sqrt (/ 1 (pow x 5))) (/ 1 (sqrt 1/32)))) (* (sqrt (/ 1 x)) (sqrt 1/32))))) (pow x 2))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ 1/32 (pow x 5))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ (- 1/32 (* 5/32 (/ 1 x))) (pow x 5))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ (- (+ 1/32 (/ 15/32 (pow x 2))) (* 5/32 (/ 1 x))) (pow x 5))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (/ (- (+ 1/32 (/ 15/32 (pow x 2))) (+ (* 5/32 (/ 1 x)) (* 35/32 (/ 1 (pow x 3))))) (pow x 5))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 (pow x 3))))) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))) x)) (/ (cos B) (sin B)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* (sin B) (sqrt -1/2))) (sqrt x))) (* 1/2 (* (/ (* F (* (sqrt -1) (+ (* -1/64 (/ (* x (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -1/2) 2))) (* 1/16 (pow (+ 2 (pow F 2)) 3))))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* (sin B) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow F 3) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* F (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) x)) (* -1/2 (* (/ (* (pow F 3) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* F (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt x))))) x)) (* F (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))))) x)) (* -1/2 (* (/ (* (pow F 3) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* 1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 (pow x 3))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt x)))) x)) (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/2))))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x)) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/2)) (sin B))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (sqrt x) (/ (sqrt -1) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 1/2 (* -1/16 (/ x (pow (sqrt -1/2) 2))))) (sqrt -1/2))))) (pow x 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/2)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) 1/2) x))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ 1 x)) 1/2) x)) 1/2) x)) 1/2) x))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* 1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 (pow x 3)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x)))) (* -3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 3)))))) x))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt (/ 1 x)))) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow F 2) (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 3/16 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))))) x)) (* 3/32 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/8))) (sqrt x)))) x)) (* 3/8 (* (/ (* (pow F 4) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/8))) (sin B)) (sqrt (/ 1 x))))) x))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B)))) (* -3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 3)))))) x))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/32 (* (sqrt (/ 1 x)) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 3/16 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8)))))) x)) (* 3/32 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8)))))) x)) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) x)) (* -1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B)))) x))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/8 (* (sqrt x) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 5/4 (* -9/256 (/ x (pow (sqrt -1/8) 2))))) (* (sin B) (sqrt -1/8)))))) (pow x 3))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (* (sin B) (sqrt -1/8))))) (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (sqrt -1/8)) (sin B))))) x))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (* (sqrt (/ 1 (pow x 3))) (* (sqrt -1) (sqrt -1/8))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/8)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/8)))) x))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (/ (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/8)))) (+ (* 3/8 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -1/8)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/8))))) x))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -3/8 (* (sqrt x) (/ (sqrt -1) (sqrt -1/8)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 5/4 (* -9/256 (/ x (pow (sqrt -1/8) 2))))) (sqrt -1/8))))) (pow x 3))) (+ (* -3/16 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/8)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/8))))) x))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (* -1 (/ (- (* 3/8 (/ 1 x)) 1/8) (pow x 3)))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* 3/4 (/ 1 x)) 3/8) x)) 1/8) (pow x 3)))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 5/4 (/ 1 x)) 3/4) x)) 3/8) x)) 1/8) (pow x 3)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 5)))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 45/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 5))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -45/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 3/16 (* (/ (* (pow F 2) (* (sqrt -1) (+ 35/32 (* -25/4096 (/ x (pow (sqrt -1/32) 2)))))) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -15/512 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* 3/8 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 (pow x 5))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x)))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -5/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (+ (* 15/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 5))))) (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -15/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt x))) (* 1/2 (* (/ (* (pow F 2) (* (sqrt -1) (+ 35/32 (* -25/4096 (/ x (pow (sqrt -1/32) 2)))))) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -5/64 (* (/ (* (pow F 2) (sqrt -1)) (* (sin B) (sqrt -1/32))) (sqrt (/ 1 (pow x 3))))) (* (/ (* (pow F 2) (* (sqrt -1) (sqrt -1/32))) (sin B)) (sqrt (/ 1 x))))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (* (sqrt (/ 1 (pow x 5))) (* (sqrt -1) (sqrt -1/32)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/32)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/32)))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/32)))) (+ (* 15/64 (* (sqrt (/ 1 (pow x 5))) (/ (sqrt -1) (sqrt -1/32)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/32))))) (pow x 2))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -15/64 (* (sqrt x) (/ (sqrt -1) (sqrt -1/32)))) (* 1/2 (* (sqrt (/ 1 x)) (/ (* (sqrt -1) (+ 35/32 (* -25/4096 (/ x (pow (sqrt -1/32) 2))))) (sqrt -1/32))))) (pow x 3))) (+ (* -5/64 (* (sqrt (/ 1 (pow x 3))) (/ (sqrt -1) (sqrt -1/32)))) (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/32))))) (pow x 2))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (* -1 (/ (- (* 5/32 (/ 1 x)) 1/32) (pow x 5)))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* 15/32 (/ 1 x)) 5/32) x)) 1/32) (pow x 5)))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(hole binary64 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* 35/32 (/ 1 x)) 15/32) x)) 5/32) x)) 1/32) (pow x 5)))))
Outputs
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))) (*.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))))) (-.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))) #s(literal 3 binary64))) (fma.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (-.f64 (*.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))) (*.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))))))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (neg.f64 (*.f64 x #s(literal 1 binary64))) (neg.f64 (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))
(*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))
F
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))))
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
(-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 F F)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
(+.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(sin.f64 B)
#s(literal -1 binary64)
(pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))
(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
(exp.f64 (*.f64 (log.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -1 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) x) (*.f64 #s(literal 2 binary64) x)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))))
(-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) x)
(*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))
(*.f64 (pow.f64 F #s(literal 1 binary64)) (pow.f64 F #s(literal 1 binary64)))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 F F)
(pow.f64 F #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))) (*.f64 (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
(-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (*.f64 #s(literal -3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))
(pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))
(*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))
(pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)) #s(literal -1 binary64))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -3 binary64)))
#s(literal -3 binary64)
(*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))
#s(literal 3/8 binary64)
(*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))
(/.f64 (neg.f64 (*.f64 F F)) (neg.f64 (sin.f64 B)))
(/.f64 (*.f64 F F) (sin.f64 B))
(pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 5 binary64))))
(sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))
(*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))
(pow.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 5 binary64)) #s(literal -1 binary64))
(pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 5 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 5 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))) #s(literal -5 binary64)))
#s(literal -5 binary64)
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -5/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 F (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))
#s(approx F F)
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
#s(approx (* F F) (*.f64 F F))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))
#s(approx (/ (* F F) (sin B)) (/.f64 (*.f64 F F) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (pow.f64 F #s(literal 5 binary64)) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 (pow.f64 F #s(literal 5 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 (pow.f64 F #s(literal 5 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (pow.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (pow.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 (*.f64 F F) (sin.f64 B))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (*.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 F #s(literal 5 binary64)) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 F #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 F F) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x))))) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 x B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (-.f64 x (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (tan B) B)
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 B B)))))
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 B B)))))))
#s(approx (tan B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 B B)))))))))
#s(approx B B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (fma.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) F (fma.f64 #s(literal 1/720 binary64) F (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) F (*.f64 #s(literal 1/120 binary64) F)))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))))))) B))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (/.f64 (*.f64 F (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) B))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (/.f64 (fma.f64 F (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 B B) (*.f64 F (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))))) B))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (/.f64 (fma.f64 F (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 B B) (fma.f64 F (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 B B) (*.f64 F (fma.f64 #s(literal 7/360 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))))))))) B))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (/.f64 (fma.f64 F (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 B B) (fma.f64 F (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 B B) (fma.f64 F (fma.f64 #s(literal 7/360 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))) (*.f64 (*.f64 B B) (*.f64 F (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))))) (*.f64 #s(literal -31/30240 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))))))))))) B))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) B))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) B))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 7/360 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) B))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 7/360 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))))) (*.f64 #s(literal -31/30240 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) B))
#s(approx (pow (sin B) -1) (pow.f64 B #s(literal -1 binary64)))
#s(approx (pow (sin B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))) B))
#s(approx (pow (sin B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 B B))))) B))
#s(approx (pow (sin B) -1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 B B))))))) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 B (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B)))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 B B)))) #s(literal 1/6 binary64))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))) B))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (fma.f64 (*.f64 B B) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) B))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) B))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))))) (*.f64 #s(literal -31/30240 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) B))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))) B))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))))) B))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))))))) B))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/12 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (fma.f64 #s(literal -7/720 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))))) (*.f64 #s(literal -31/30240 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))))))))))) B))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 (pow.f64 B #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 B B) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))) B))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal 7/360 binary64) (*.f64 (*.f64 B B) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))) B))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal 31/15120 binary64) (*.f64 (*.f64 B B) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))) (*.f64 #s(literal 7/360 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64)))))))) B))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) B) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (*.f64 B F) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))) B))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -3/8 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) B))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal 3/8 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -3/8 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -3/8 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))))) B))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (*.f64 (/.f64 (*.f64 F F) B) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (*.f64 B F) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))) B))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))) B))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))))) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64))))))) (*.f64 (*.f64 F F) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5/2 binary64)))) B))
#s(approx (/ (* F F) (sin B)) (/.f64 (*.f64 F F) B))
#s(approx (/ (* F F) (sin B)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (*.f64 B F) #s(literal 2 binary64)) (*.f64 F F)) B))
#s(approx (/ (* F F) (sin B)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))) (*.f64 #s(literal -1/6 binary64) (*.f64 F F))) (*.f64 F F)) B))
#s(approx (/ (* F F) (sin B)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) (*.f64 F F) (fma.f64 #s(literal 1/720 binary64) (*.f64 F F) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F)))))))) (fma.f64 #s(literal -1/36 binary64) (*.f64 F F) (*.f64 #s(literal 1/120 binary64) (*.f64 F F))))) (*.f64 #s(literal -1/6 binary64) (*.f64 F F))) (*.f64 F F)) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (* x 1) (tan B)) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (tan B) (tan.f64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) x (*.f64 F F))) #s(literal -1 binary64)))))
#s(approx (pow (sin B) -1) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (sin B) (sin.f64 B))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3/2 binary64))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (fma.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* x 1) x)
#s(approx x x)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))) (*.f64 x (fma.f64 #s(literal -5/2 binary64) (*.f64 (/.f64 (*.f64 F x) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 binary64)))) (*.f64 #s(literal 3/2 binary64) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))) (*.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 F (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 F (*.f64 x (-.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))))) (*.f64 F (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 F (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (*.f64 x (fma.f64 F (*.f64 x (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 3/8 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64))))))))) (*.f64 F (-.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 F (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))) (*.f64 x (fma.f64 F (-.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))) (*.f64 x (fma.f64 F (*.f64 x (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 5/16 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 105/256 binary64) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 35/64 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))))))))) (*.f64 F (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 3/8 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))))))))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 x (-.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))) (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 x (-.f64 (fma.f64 x (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 3/8 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))) (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 x (-.f64 (fma.f64 x (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 3/8 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 x (fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 5/16 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 105/256 binary64) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 35/64 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64))))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))) (fma.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 x (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 3/8 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 5/16 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 3/8 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (+ 2 (* 2 x)) -1) #s(literal 1/2 binary64))
#s(approx (pow (+ 2 (* 2 x)) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) x) #s(literal 1/2 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -1) (+.f64 #s(literal 1/2 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) x))) #s(literal 1/2 binary64)))))
#s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))
#s(approx (+ 2 (* 2 x)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (* 2 x) (*.f64 #s(literal 2 binary64) x))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (fma.f64 (*.f64 F F) (*.f64 x (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (fma.f64 x (fma.f64 (*.f64 F F) (*.f64 x (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (fma.f64 x (fma.f64 x (fma.f64 (*.f64 F F) (*.f64 x (fma.f64 #s(literal -3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 105/256 binary64) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 35/64 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)))))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (fma.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (fma.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (fma.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)) (*.f64 x (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)) (fma.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (fma.f64 #s(literal 3/32 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)) (*.f64 x (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (fma.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 x (fma.f64 #s(literal -3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 105/256 binary64) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 35/64 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))))))))))))))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (fma.f64 #s(literal -3/16 binary64) (/.f64 x (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (fma.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x (sin.f64 B)) (/.f64 #s(literal 15/32 binary64) (sqrt.f64 #s(literal 1/8 binary64))))) (*.f64 #s(literal 3/16 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (fma.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x (sin.f64 B)) (/.f64 #s(literal 35/64 binary64) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))))))) (*.f64 #s(literal 3/16 binary64) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (sqrt.f64 #s(literal 1/8 binary64)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (-.f64 (sqrt.f64 #s(literal 1/8 binary64)) (*.f64 #s(literal 3/16 binary64) (/.f64 x (sqrt.f64 #s(literal 1/8 binary64))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (+.f64 (sqrt.f64 #s(literal 1/8 binary64)) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 15/32 binary64)) (sqrt.f64 #s(literal 1/8 binary64)))) (*.f64 #s(literal 3/16 binary64) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64)))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (+.f64 (sqrt.f64 #s(literal 1/8 binary64)) (*.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 35/64 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 15/32 binary64) (sqrt.f64 #s(literal 1/8 binary64)))))) (*.f64 #s(literal 3/16 binary64) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (+ 2 (* 2 x)) -3) #s(literal 1/8 binary64))
#s(approx (pow (+ 2 (* 2 x)) -3) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -3/8 binary64) x)))
#s(approx (pow (+ 2 (* 2 x)) -3) (+.f64 #s(literal 1/8 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 3/4 binary64) x) #s(literal 3/8 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -3) (+.f64 #s(literal 1/8 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 3/4 binary64) (*.f64 #s(literal -5/4 binary64) x))) #s(literal 3/8 binary64)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (fma.f64 #s(literal -15/512 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 x (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (fma.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (*.f64 x #s(literal 35/128 binary64)) (sqrt.f64 #s(literal 1/32 binary64)))))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (fma.f64 #s(literal 3/8 binary64) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (*.f64 x (fma.f64 #s(literal -15/512 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 x (fma.f64 #s(literal -3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (*.f64 x #s(literal 105/256 binary64)) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 3/16 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))))))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (fma.f64 #s(literal -5/64 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 x (sqrt.f64 #s(literal 1/32 binary64)))) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (fma.f64 x (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (*.f64 x #s(literal 35/128 binary64)) (sqrt.f64 #s(literal 1/32 binary64)))))) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (fma.f64 x (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 x (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (*.f64 x #s(literal 105/256 binary64)) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))))) (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (sqrt.f64 #s(literal 1/32 binary64)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (-.f64 (sqrt.f64 #s(literal 1/32 binary64)) (*.f64 #s(literal 5/64 binary64) (/.f64 x (sqrt.f64 #s(literal 1/32 binary64))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (+.f64 (sqrt.f64 #s(literal 1/32 binary64)) (*.f64 x (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x #s(literal 35/128 binary64)) (sqrt.f64 #s(literal 1/32 binary64)))) (*.f64 #s(literal 5/64 binary64) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64)))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (+.f64 (sqrt.f64 #s(literal 1/32 binary64)) (*.f64 x (-.f64 (*.f64 x (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x #s(literal 105/256 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 35/128 binary64) (sqrt.f64 #s(literal 1/32 binary64)))))) (*.f64 #s(literal 5/64 binary64) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (+ 2 (* 2 x)) -5) #s(literal 1/32 binary64))
#s(approx (pow (+ 2 (* 2 x)) -5) (+.f64 #s(literal 1/32 binary64) (*.f64 #s(literal -5/32 binary64) x)))
#s(approx (pow (+ 2 (* 2 x)) -5) (+.f64 #s(literal 1/32 binary64) (*.f64 x (-.f64 (*.f64 #s(literal 15/32 binary64) x) #s(literal 5/32 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -5) (+.f64 #s(literal 1/32 binary64) (*.f64 x (-.f64 (*.f64 x (+.f64 #s(literal 15/32 binary64) (*.f64 #s(literal -35/32 binary64) x))) #s(literal 5/32 binary64)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 x (-.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 F (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 F (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (*.f64 x x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (+.f64 (/.f64 (*.f64 F (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (*.f64 x x)) (/.f64 (*.f64 F (fma.f64 #s(literal 3/32 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (sqrt.f64 x)) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 x) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)))))) (pow.f64 x #s(literal 3 binary64)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 3/32 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/16 binary64) (/.f64 x #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (pow (+ 2 (* 2 x)) -1) (/.f64 #s(literal 1/2 binary64) x))
#s(approx (pow (+ 2 (* 2 x)) -1) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))
#s(approx (pow (+ 2 (* 2 x)) -1) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)))) x))
#s(approx (pow (+ 2 (* 2 x)) -1) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 x x))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -3 binary64))))) x))
#s(approx (+ 2 (* 2 x)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (fma.f64 #s(literal 3/32 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))) x))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (fma.f64 #s(literal 3/32 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 x) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal -15/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64)))))) x))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))) (fma.f64 #s(literal 3/32 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))) x))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))) (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal -15/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (fma.f64 #s(literal 3/32 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))) x))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))) x))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))) x))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 #s(literal 5/4 binary64) (*.f64 #s(literal 9/256 binary64) (/.f64 x #s(literal 1/8 binary64)))) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))))) (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/8 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))))) x))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -3 binary64)) #s(literal 1/8 binary64))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/8 binary64)))) x))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/8 binary64))))) x))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 #s(literal 5/4 binary64) (*.f64 #s(literal 9/256 binary64) (/.f64 x #s(literal 1/8 binary64)))) (sqrt.f64 #s(literal 1/8 binary64)))) (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/8 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/8 binary64)))))) x))
#s(approx (pow (+ 2 (* 2 x)) -3) (/.f64 #s(literal 1/8 binary64) (pow.f64 x #s(literal 3 binary64))))
#s(approx (pow (+ 2 (* 2 x)) -3) (/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal 3 binary64))))
#s(approx (pow (+ 2 (* 2 x)) -3) (/.f64 (-.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 3/4 binary64) (*.f64 x x))) (*.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal 3 binary64))))
#s(approx (pow (+ 2 (* 2 x)) -3) (/.f64 (-.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 3/4 binary64) (*.f64 x x))) (fma.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 5/4 binary64) (pow.f64 x #s(literal -3 binary64))))) (pow.f64 x #s(literal 3 binary64))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal -15/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (*.f64 x x)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal -15/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 45/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (*.f64 x x)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (+.f64 #s(literal 35/32 binary64) (*.f64 #s(literal 25/4096 binary64) (/.f64 x #s(literal 1/32 binary64)))) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (fma.f64 #s(literal -15/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 45/512 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))) (*.f64 x x)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (*.f64 x x)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 15/64 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (*.f64 x x)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (+.f64 #s(literal 35/32 binary64) (*.f64 #s(literal 25/4096 binary64) (/.f64 x #s(literal 1/32 binary64)))) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (fma.f64 #s(literal -5/64 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 15/64 binary64) (*.f64 (/.f64 (*.f64 F F) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/32 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (*.f64 x x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -5 binary64)) #s(literal 1/32 binary64))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/32 binary64)))) (*.f64 x x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 15/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/32 binary64))))) (*.f64 x x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 #s(literal 35/32 binary64) (*.f64 #s(literal 25/4096 binary64) (/.f64 x #s(literal 1/32 binary64)))) (sqrt.f64 #s(literal 1/32 binary64)))) (fma.f64 #s(literal -5/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal 15/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (pow.f64 (sqrt.f64 #s(literal 1/32 binary64)) #s(literal -1 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/32 binary64)))))) (*.f64 x x)))
#s(approx (pow (+ 2 (* 2 x)) -5) (/.f64 #s(literal 1/32 binary64) (pow.f64 x #s(literal 5 binary64))))
#s(approx (pow (+ 2 (* 2 x)) -5) (/.f64 (-.f64 #s(literal 1/32 binary64) (*.f64 #s(literal 5/32 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal 5 binary64))))
#s(approx (pow (+ 2 (* 2 x)) -5) (/.f64 (-.f64 (+.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 x x))) (*.f64 #s(literal 5/32 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal 5 binary64))))
#s(approx (pow (+ 2 (* 2 x)) -5) (/.f64 (-.f64 (+.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 15/32 binary64) (*.f64 x x))) (fma.f64 #s(literal 5/32 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 #s(literal 35/32 binary64) (pow.f64 x #s(literal -3 binary64))))) (pow.f64 x #s(literal 5 binary64))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 x)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 x (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (/.f64 F (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 F (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* F (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 F (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 3/32 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 x))))) x) (*.f64 F (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (+ (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -1))) (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 3/32 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 x)))) x) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 B)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -1)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 x) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 x #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (pow (+ 2 (* 2 x)) -1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/2 binary64)) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/2 binary64)) x)) #s(literal 1/2 binary64)) x)))
#s(approx (pow (+ 2 (* 2 x)) -1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/2 binary64)) x)) #s(literal 1/2 binary64)) x)) #s(literal 1/2 binary64)) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 #s(literal -3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/32 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)))
#s(approx (* (* F F) (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 F F) (fma.f64 #s(literal -15/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 x)) (*.f64 #s(literal 3/16 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64)))))))) x) (*.f64 #s(literal 3/32 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 x)))) x) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 F #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/8 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))) (*.f64 #s(literal -3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))) x)))
#s(approx (+ (* -1/2 (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3)))) (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -15/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 x)) (*.f64 #s(literal 3/16 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))))) x) (*.f64 #s(literal 3/32 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))))) x) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B)))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))) x)))
#s(approx (* (pow (sin B) -1) (sqrt (pow (+ 2 (* 2 x)) -3))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/8 binary64) (*.f64 (sqrt.f64 x) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sin.f64 B)) (/.f64 (+.f64 #s(literal 5/4 binary64) (*.f64 #s(literal -9/256 binary64) (/.f64 x #s(literal -1/8 binary64)))) (sqrt.f64 #s(literal -1/8 binary64))))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/8 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (sqrt.f64 #s(literal 1/8 binary64)) (sin.f64 B))))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -3 binary64)) #s(literal 1/8 binary64)))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/8 binary64)))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 8 binary64))) (fma.f64 #s(literal 3/8 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/8 binary64))))) x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -3)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -3/8 binary64) (*.f64 (sqrt.f64 x) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 5/4 binary64) (*.f64 #s(literal -9/256 binary64) (/.f64 x #s(literal -1/8 binary64))))) (sqrt.f64 #s(literal -1/8 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -3/16 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/8 binary64))))) x)))
#s(approx (pow (+ 2 (* 2 x)) -3) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 3/8 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/8 binary64)) (pow.f64 x #s(literal 3 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -3) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 3/4 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 3/8 binary64)) x)) #s(literal 1/8 binary64)) (pow.f64 x #s(literal 3 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -3) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5/4 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 3/4 binary64)) x)) #s(literal 3/8 binary64)) x)) #s(literal 1/8 binary64)) (pow.f64 x #s(literal 3 binary64)))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal -15/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (*.f64 x x)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal -15/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 45/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (*.f64 x x)))
#s(approx (* 3/8 (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -45/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 x)) (*.f64 #s(literal 3/16 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 35/32 binary64) (*.f64 #s(literal -25/4096 binary64) (/.f64 x #s(literal -1/32 binary64))))) (sqrt.f64 #s(literal -1/32 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -15/512 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (*.f64 x x)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (*.f64 x x)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (fma.f64 #s(literal 15/64 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (*.f64 x x)))
#s(approx (* (/ (* F F) (sin B)) (sqrt (pow (+ 2 (* 2 x)) -5))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -15/64 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 x)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 35/32 binary64) (*.f64 #s(literal -25/4096 binary64) (/.f64 x #s(literal -1/32 binary64))))) (sqrt.f64 #s(literal -1/32 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -5/64 binary64) (*.f64 (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 F F) (sqrt.f64 #s(literal 1/32 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) (*.f64 x x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -5 binary64)) #s(literal 1/32 binary64))))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/32 binary64)))) (*.f64 x x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (/.f64 (fma.f64 #s(literal -5/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 32 binary64))) (fma.f64 #s(literal 15/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/32 binary64))))) (*.f64 x x)))
#s(approx (sqrt (pow (+ 2 (* 2 x)) -5)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -15/64 binary64) (*.f64 (sqrt.f64 x) (sqrt.f64 #s(literal 32 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 x)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 #s(literal 35/32 binary64) (*.f64 #s(literal -25/4096 binary64) (/.f64 x #s(literal -1/32 binary64))))) (sqrt.f64 #s(literal -1/32 binary64)))))) (pow.f64 x #s(literal 3 binary64))) (fma.f64 #s(literal -5/64 binary64) (*.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (sqrt.f64 #s(literal 32 binary64))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/32 binary64))))) (*.f64 x x)))
#s(approx (pow (+ 2 (* 2 x)) -5) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5/32 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/32 binary64)) (pow.f64 x #s(literal 5 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -5) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 15/32 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 5/32 binary64)) x)) #s(literal 1/32 binary64)) (pow.f64 x #s(literal 5 binary64)))))
#s(approx (pow (+ 2 (* 2 x)) -5) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 35/32 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 15/32 binary64)) x)) #s(literal 5/32 binary64)) x)) #s(literal 1/32 binary64)) (pow.f64 x #s(literal 5 binary64)))))

eval91.0ms (0.5%)

Memory
12.5MiB live, 110.7MiB allocated; 27ms collecting garbage
Compiler

Compiled 45 336 to 3 676 computations (91.9% saved)

prune1.3s (7%)

Memory
-37.0MiB live, 1 402.7MiB allocated; 21ms collecting garbage
Pruning

10 alts after pruning (0 fresh and 10 done)

PrunedKeptTotal
New4550455
Fresh000
Picked011
Done099
Total45510465
Accuracy
100.0%
Counts
465 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.5%
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
48.6%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
78.2%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
49.4%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
27.6%
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
20.6%
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
57.1%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
34.2%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
58.8%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
53.0%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Compiler

Compiled 1 611 to 507 computations (68.5% saved)

regimes18.0ms (0.1%)

Memory
23.9MiB live, 23.9MiB allocated; 0ms collecting garbage
Counts
14 → 3
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(+.f64 (neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
Calls

4 calls:

4.0ms
x
4.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
4.0ms
F
4.0ms
B
Results
AccuracySegmentsBranch
87.8%2(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
99.7%3F
78.4%1B
84.6%3x
Compiler

Compiled 30 to 29 computations (3.3% saved)

regimes5.0ms (0%)

Memory
6.7MiB live, 6.7MiB allocated; 0ms collecting garbage
Counts
12 → 3
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(+.f64 (neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (pow.f64 F #s(literal -1 binary64)))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (*.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 #s(literal 2 binary64) x (fma.f64 F F #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 F (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (*.f64 (*.f64 F F) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (*.f64 #s(literal 3/8 binary64) (*.f64 (/.f64 (*.f64 F F) (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
Calls

1 calls:

4.0ms
F
Results
AccuracySegmentsBranch
99.7%3F
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes3.0ms (0%)

Memory
4.9MiB live, 4.9MiB allocated; 0ms collecting garbage
Counts
7 → 3
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) (*.f64 F F)) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (sin.f64 B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
#s(approx (/ (- (* (* (neg x) (pow (tan B) -1)) (* (neg x) (pow (tan B) -1))) (* (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (- (* (neg x) (pow (tan B) -1)) (* (pow (+ (* 2 x) (+ (* F F) 2)) -1/2) (/ F (sin B))))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
Calls

1 calls:

2.0ms
F
Results
AccuracySegmentsBranch
99.6%3F
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes2.0ms (0%)

Memory
3.7MiB live, 3.7MiB allocated; 0ms collecting garbage
Counts
4 → 3
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Calls

1 calls:

2.0ms
F
Results
AccuracySegmentsBranch
95.6%3F
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes7.0ms (0%)

Memory
-37.6MiB live, 11.5MiB allocated; 1ms collecting garbage
Counts
3 → 2
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 B) x) (*.f64 (cos.f64 B) x)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x))))) (sin.f64 B))))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Calls

4 calls:

2.0ms
x
2.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
1.0ms
B
1.0ms
F
Results
AccuracySegmentsBranch
61.5%2B
58.8%1x
62.7%3(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
71.0%2F
Compiler

Compiled 30 to 29 computations (3.3% saved)

regimes4.0ms (0%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Calls

4 calls:

1.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
1.0ms
x
1.0ms
B
1.0ms
F
Results
AccuracySegmentsBranch
53.0%1x
53.0%1(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))
53.0%1B
53.0%1F
Compiler

Compiled 30 to 29 computations (3.3% saved)

bsearch71.0ms (0.4%)

Memory
27.6MiB live, 75.0MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
34.0ms
1.1674336209173476e-7
1605723064.0948303
30.0ms
-3.109566906243572e+63
-2.0185913313917094e+58
Samples
46.0ms304×0valid
4.0ms32×0invalid
Compiler

Compiled 1 255 to 966 computations (23% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-mult: 8.0ms (19.7% of total)
ival-tan: 7.0ms (17.2% of total)
ival-div: 6.0ms (14.8% of total)
ival-sin: 6.0ms (14.8% of total)
ival-pow: 6.0ms (14.8% of total)
ival-add: 4.0ms (9.8% of total)
ival-neg: 3.0ms (7.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)

bsearch3.0ms (0%)

Memory
4.3MiB live, 4.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.1674336209173476e-7
1605723064.0948303
1.0ms
-3.109566906243572e+63
-2.0185913313917094e+58
Compiler

Compiled 1 369 to 1 042 computations (23.9% saved)

bsearch70.0ms (0.4%)

Memory
-21.6MiB live, 73.2MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
32.0ms
1.1674336209173476e-7
1605723064.0948303
32.0ms
-3131947.403217427
-0.06067259175486643
Samples
45.0ms288×0valid
4.0ms31×0invalid
Compiler

Compiled 2 338 to 1 517 computations (35.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-mult: 8.0ms (20% of total)
ival-tan: 8.0ms (20% of total)
ival-div: 6.0ms (15% of total)
ival-sin: 6.0ms (15% of total)
ival-pow: 5.0ms (12.5% of total)
ival-add: 4.0ms (10% of total)
ival-neg: 2.0ms (5% 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)

bsearch25.0ms (0.1%)

Memory
-23.5MiB live, 25.6MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
18.0ms
1.1674336209173476e-7
1605723064.0948303
2.0ms
-3131947.403217427
-0.06067259175486643
Samples
12.0ms80×0valid
1.0ms11×0invalid
Compiler

Compiled 2 498 to 1 587 computations (36.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 11.0ms
ival-div: 2.0ms (19% of total)
ival-mult: 2.0ms (19% of total)
ival-sin: 2.0ms (19% of total)
ival-tan: 2.0ms (19% of total)
ival-add: 1.0ms (9.5% of total)
ival-pow: 1.0ms (9.5% of total)
ival-neg: 1.0ms (9.5% 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)

bsearch22.0ms (0.1%)

Memory
24.8MiB live, 24.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
20.0ms
1.362861233686871e-114
1.3405267901527835e-113
Samples
13.0ms96×0valid
2.0ms12×0invalid
Compiler

Compiled 576 to 410 computations (28.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 12.0ms
ival-div: 2.0ms (16.4% of total)
ival-mult: 2.0ms (16.4% of total)
ival-sin: 2.0ms (16.4% of total)
ival-tan: 2.0ms (16.4% of total)
ival-pow: 2.0ms (16.4% of total)
ival-add: 1.0ms (8.2% of total)
ival-neg: 1.0ms (8.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)

simplify48.0ms (0.3%)

Memory
-7.5MiB live, 40.2MiB allocated; 1ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0105683
1191644
2357637
3803637
42904637
Stop Event
node limit
Calls
Call 1
Inputs
(if (<=.f64 F #s(literal -20500000000000000032872043119487297566469199812896258785280 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 270000000 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -20500000000000000032872043119487297566469199812896258785280 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 270000000 binary64)) (+.f64 (neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -6980579422424269/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5/2 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -6980579422424269/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5404319552844595/1125899906842624 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))))
(if (<=.f64 F #s(literal 4297638025887263/2772669694120814859578414184143083703436437075375816575170479580614621307805625623039974406104139578097391210961403571828974157824 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
Outputs
(if (<=.f64 F #s(literal -20500000000000000032872043119487297566469199812896258785280 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 270000000 binary64)) (+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -20500000000000000032872043119487297566469199812896258785280 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 270000000 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -20500000000000000032872043119487297566469199812896258785280 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 270000000 binary64)) (+.f64 (neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -20500000000000000032872043119487297566469199812896258785280 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 270000000 binary64)) (+.f64 (*.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (*.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -6980579422424269/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5/2 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -6980579422424269/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 5/2 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -6980579422424269/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5404319552844595/1125899906842624 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))))
(if (<=.f64 F #s(literal -6980579422424269/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 5404319552844595/1125899906842624 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -3 binary64))) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -5 binary64))) (/.f64 (*.f64 F F) (sin.f64 B))) #s(literal 3/8 binary64))) (*.f64 F F) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) x #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))))
(if (<=.f64 F #s(literal 4297638025887263/2772669694120814859578414184143083703436437075375816575170479580614621307805625623039974406104139578097391210961403571828974157824 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))))
(if (<=.f64 F #s(literal 4297638025887263/2772669694120814859578414184143083703436437075375816575170479580614621307805625623039974406104139578097391210961403571828974157824 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- 1 (* (cos B) x)) (sin B)) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))

derivations54.0ms (0.3%)

Memory
-3.4MiB live, 44.5MiB allocated; 1ms collecting garbage
Stop Event
done
Compiler

Compiled 715 to 102 computations (85.7% saved)

preprocess46.0ms (0.3%)

Memory
13.2MiB live, 60.5MiB allocated; 2ms collecting garbage
Remove

(negabs B)

Compiler

Compiled 1 696 to 344 computations (79.7% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...