Metrics for VandenBroeck and Keller, Equation (23)

start0.0ms (0%)

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

analyze568.0ms (6.6%)

Memory

17.5MiB live, 723.3MiB allocated; 155ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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.5s (28.7%)

Memory

12.2MiB live, 3 196.6MiB allocated; 600ms collecting garbage

Samples

1.7s	8 256×	0	valid
75.0ms	295×	0	invalid

Precisions

Click to see histograms. Total time spent on operations: 1.5s

ival-sin: 271.0ms (18.4% of total)

ival-mult: 255.0ms (17.3% of total)

ival-pow: 216.0ms (14.6% of total)

ival-tan: 215.0ms (14.6% of total)

ival-add: 202.0ms (13.7% of total)

ival-div: 195.0ms (13.2% of total)

ival-neg: 101.0ms (6.8% of total)

exact: 14.0ms (0.9% of total)

adjust: 3.0ms (0.2% of total)

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

Bogosity

explain323.0ms (3.7%)

Memory

29.6MiB live, 561.2MiB allocated; 78ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Example	Subexpression
80	-	-	`(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))))`
42	-	-	`(.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)))))`
0	-	-	`(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))`
0	-	-	`#s(literal 1 binary64)`
0	-	-	`(+.f64 (*.f64 F F) #s(literal 2 binary64))`
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))))))`
0	-	-	`(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))`
0	-	-	`(*.f64 F F)`
0	-	-	`(*.f64 #s(literal 2 binary64) x)`
0	-	-	`(neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
0	-	-	`F`
0	-	-	`(tan.f64 B)`
0	-	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	-	-	`(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))`
0	-	-	`(/.f64 F (sin.f64 B))`
0	-	-	`#s(literal 2 binary64)`
0	-	-	`(/.f64 #s(literal 1 binary64) (tan.f64 B))`
0	-	-	`x`
0	-	-	`B`
0	-	-	`(sin.f64 B)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`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-rescue	80	0
↳	`(*.f64 F F)`	overflow	80
↳	`(+.f64 (*.f64 F F) #s(literal 2 binary64))`	overflow	80
↳	`(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))`	overflow	80
`*.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)))))`	*no**	42	0

Confusion

	Predicted +	Predicted -
+	71	0
-	20	165

Precision

0.7802197802197802

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	71	0	0
-	20	0	165

Precision?

0.7802197802197802

Recall?

1.0

Freqs

test

number	freq
0	165
1	60
2	31

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

102.0ms

512×

valid

Compiler

Compiled 265 to 64 computations (75.8% saved)

Precisions

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

ival-tan: 14.0ms (18.2% of total)

ival-mult: 13.0ms (16.9% of total)

ival-sin: 13.0ms (16.9% of total)

ival-div: 11.0ms (14.3% of total)

ival-pow: 11.0ms (14.3% of total)

ival-add: 7.0ms (9.1% of total)

ival-neg: 7.0ms (9.1% of total)

exact: 1.0ms (1.3% of total)

adjust: 0.0ms (0% of total)

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

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

preprocess180.0ms (2.1%)

Memory

-27.9MiB live, 203.1MiB allocated; 25ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	83	250
1	251	212
2	692	212
3	1864	212
4	6655	212
0	20	24
0	37	24
1	71	21
2	168	21
3	452	21
4	1342	21
5	5211	21
0	8198	21

Stop Event

1×	iter limit
1×	node limit
1×	iter limit
1×	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))))))

(-.f64 (*.f64 (pow.f64 (-.f64 (+.f64 (*.f64 F F) x) (-.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (/.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.0MiB live, 1.0MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	72.8%	(+.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))))))

Status

Accuracy

Program

▶

72.8%

(+.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)

series82.0ms (1%)

Memory

18.7MiB live, 64.6MiB allocated; 4ms 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:

Time	Variable		Point	Expression
40.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 (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))
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 (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))
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	@	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))

rewrite208.0ms (2.4%)

Memory

-30.0MiB live, 224.6MiB allocated; 100ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	715	5959
0	741	5431
0	4291	5431

Stop Event

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

Counts

147 → 183

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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 3 binary64))) (+.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 (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))))
(+.f64 (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (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)) #s(literal -1/2 binary64)))
(/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/4 binary64)) (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/4 binary64)))
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))
(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 F F) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) x) (+.f64 (.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)))))
(+.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 (+.f64 (.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 (+.f64 (.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.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 (+.f64 (*.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))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.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))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.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))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/8 binary64)) (.f64 (.f64 #s(literal -5/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -7 binary64))))) (.f64 F F)) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))
#s(approx (+ (* F F) 2) #s(literal 2 binary64))
#s(approx (+ (* F F) 2) (+.f64 (*.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))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F 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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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 (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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 (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (*.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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #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 (+.f64 (.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 (+.f64 (.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) (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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))) (/.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) (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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))) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (+.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64)))) (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) 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 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 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 (-.f64 x (.f64 (.f64 (*.f64 B B) x) #s(literal 1/3 binary64))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (-.f64 (neg.f64 (.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 (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 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 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 (.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 (+.f64 (.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 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (tan B) (.f64 (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.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) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (.f64 B B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B)) (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) B))
#s(approx (/ F (sin B)) (/.f64 F B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (*.f64 B B) F) #s(literal 1/6 binary64)) F) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (.f64 B B))) (.f64 #s(literal -1/6 binary64) F)) (.f64 B B)) F) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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 (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (sin B) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) (/.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) (/.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 (+.f64 (.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))))) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.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))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.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))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.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 (+.f64 (.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)))) (+.f64 (neg.f64 (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.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)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.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)))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.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 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) x)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/2 binary64)) (.f64 (.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (+ (* F F) 2) (* 2 x)) (+.f64 (*.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 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (.f64 (+.f64 (.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 (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.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 -5 binary64))) (/.f64 (.f64 (+.f64 (.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 (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)))) (+.f64 (.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 (+.f64 (.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)))) (+.f64 (+.f64 (.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 (+.f64 (.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))) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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)))) (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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))) (+.f64 (.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 (+.f64 (.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))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.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))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #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 (+.f64 (.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 (+.f64 (neg.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))))) (neg.f64 (.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (.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 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) x)) (/.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 (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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)))) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))) x)) (/.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)))) (+.f64 (.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 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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)))) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.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 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))))
#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))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) (+.f64 (+.f64 (.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 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.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)))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) x)) #s(literal 2 binary64)) x)))

eval28.0ms (0.3%)

Memory: 26.8MiB live, 74.4MiB allocated; 8ms collecting garbage
Compiler: Compiled 9 116 to 1 114 computations (87.8% saved)

prune19.0ms (0.2%)

Memory

11.5MiB live, 54.5MiB allocated; 5ms collecting garbage

Pruning

15 alts after pruning (15 fresh and 0 done)

	Pruned	Kept	Total
New	177	15	192
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	178	15	193

Accuracy

99.9%

Counts

193 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.9%	(+.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))))))
▶	81.7%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
	33.6%	(+.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))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)) F))))
	59.6%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
	58.9%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
	72.8%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) (/.f64 F (sin.f64 B)))))
	72.8%	(+.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))))))
▶	47.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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))))))
	42.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
▶	42.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
▶	43.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
	49.4%	#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)))
	29.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
▶	59.5%	#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))))
	51.8%	#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))))

Compiler

Compiled 1 290 to 880 computations (31.8% saved)

series242.0ms (2.8%)

Memory

-14.9MiB live, 350.6MiB allocated; 102ms collecting garbage

Counts

66 → 702

Calls

Call 1

Inputs
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(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 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))
(.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))
F
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/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)
#s(literal -2 binary64)
#s(literal -1/2 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)
(-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))
(sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))
(+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))
(+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))
(*.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 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B)
(-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x)
(+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F))
(.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B))
(+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B)))
(-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (*.f64 #s(literal -1/3 binary64) x))
(.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(*.f64 #s(literal 1/6 binary64) F)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/3 binary64) x)
#s(literal -1/3 binary64)
(.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (*.f64 B B))
(+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(*.f64 x #s(literal 1/45 binary64))
#s(literal 1/45 binary64)
(neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))
(.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(*.f64 F #s(literal -7/360 binary64))
#s(literal -7/360 binary64)
(*.f64 B B)
#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)
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 x 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))
(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))
(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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (sqrt (/ 1 (- 2 (* -2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (- 2 (* -2 x)) 3)))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #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)))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (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 #s(hole binary64 F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (- 2 (* -2 x))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (pow F 2)) (* -2 x))))
#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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* B (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) (* F (+ (* B (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x)))))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* B (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) (* F (+ (* B (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* B (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* B (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) (* F (+ (* B (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (+ (* B (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* 3/8 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* B (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))))) (/ x B))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))) (* (pow B 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))) (* (pow B 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x)))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* F (+ (* (pow B 2) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* F (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* (pow B 2) (* (pow F 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x)))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* 1/3 x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* F (+ (* -1/12 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* 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))))))))) (* -1/3 x))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* F (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -1/12 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 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)))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/96 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (* 1/6 F) #s(hole binary64 (* 1/6 F)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* 1/45 (* (pow B 2) x))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/45 (* (pow B 2) x)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* -7/720 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* (pow F 2) (+ (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 7/960 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* 1/45 x)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ (* 7/360 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/45 x))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ (* 1/45 x) (* F (- (* -7/720 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ (* 1/45 x) (* F (- (* (pow F 2) (- (* 7/960 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* F (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* F (- (* -7/720 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* F (- (* (pow F 2) (- (* 7/960 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* F (- (* (pow F 2) (- (* (pow F 2) (- (* -7/1152 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* -7/960 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* F (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* 7/720 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -7/960 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -7/960 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))) (* 7/1152 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7)))))))))))))
#s(approx (* F -7/360) #s(hole binary64 (* -7/360 F)))
#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 (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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ 1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ 1 (pow F 2)))) (* -2 (/ x (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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)))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 F))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x)))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* B (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ 1 B) (/ (* B (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (+ (* B (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ 1 B) (+ (/ (* B (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* B (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4))))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (+ (* B (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ 1 B) (+ (/ (* B (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* B (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* B (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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))))))))) (/ x B))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ 1 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x)))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2))))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4))))))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* (pow B 2) (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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))))))))) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ 1 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* (pow B 2) (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* (pow B 2) (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ (* -1/12 (/ (+ (* 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))) (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* -7/720 (/ (* (pow B 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))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- 1/6 (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ 1/6 (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2)))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/12 (/ (+ (* 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)))))) (* -1/3 x))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 1/6))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 1/6 (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/12 (/ (+ (* 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))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* (pow B 2) (+ 7/360 (* 1/45 x)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (* (pow B 2) (+ 7/360 (* 1/45 x))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* -7/720 (/ (* (pow B 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))) (* (pow B 2) (+ 7/360 (* 1/45 x))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ 7/360 (* 1/45 x))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/45 x)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ 7/360 (+ (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/45 x))) (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ 7/360 (+ (* -7/720 (/ (+ (* 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))) (* 1/45 x))) (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 7/360))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (+ 7/360 (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (+ 7/360 (* -7/720 (/ (+ (* 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)))) (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 -7/360))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) 7/360)))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) 7/360)))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 7/720 (/ (+ (* 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))))) 7/360)))
#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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 -1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4)))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))))) 1)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ -1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 -1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) 1)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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))))) 1)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ 1 x)) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* B (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* B (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))) (+ (/ 1 B) (/ x B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (+ (* B (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* B (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* B (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)))))) (+ (/ 1 B) (/ x B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (+ (* B (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* B (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* B (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* B (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))) (+ (/ 1 B) (/ x B)))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ 1 x))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))) (+ 1 x))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)))))) (+ 1 x))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))) (+ 1 x))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) 1)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))) 1)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)))))) 1)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))) 1)))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* (pow B 2) (- (* 1/45 x) 7/360)))) (+ 1/6 (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* (pow B 2) (- (* 1/45 x) 7/360)))))) (+ 1/6 (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* 7/720 (/ (* (pow B 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))) (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ (* 1/12 (/ (+ (* 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))) (* (pow B 2) (- (* 1/45 x) 7/360)))))))) (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/12 (/ (+ (* 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))))) (+ 1/6 (* -1/3 x)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 -1/6))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) 1/6)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) 1/6)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/12 (/ (+ (* 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))))) 1/6)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/45 x) 7/360))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (* (pow B 2) (- (* 1/45 x) 7/360)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (* (pow B 2) (- (* 1/45 x) 7/360))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* 7/720 (/ (* (pow B 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))) (* (pow B 2) (- (* 1/45 x) 7/360)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* 1/45 x) 7/360)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/45 x)) 7/360)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/45 x)) (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ (* 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))) (* 1/45 x)) (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 -7/360))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) 7/360)))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/720 (/ (+ (* 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))) (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 7/360))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -7/720 (/ (+ (* 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))))))))
#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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))))))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) 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))))))) (* -1/3 x)))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) 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/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x)))) x) B)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x)))) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (* B B) #s(hole binary64 (pow B 2)))
#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 (/ x B) #s(hole binary64 (/ x 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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (/ (* 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))))
#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/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* (pow B 3) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* (pow B 3) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* (pow B 3) (- (+ (* 1/45 x) (+ (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (/ F (pow B 4)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (/ x (pow B 4))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* (pow B 4) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (+ (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (/ F (pow B 4)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (/ x (pow B 4))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 4) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (+ (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (/ F (pow B 4)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 4) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* (pow B 2) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#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 (* (/ 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 (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* (pow B 3) (+ (* -1 (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (* -1 (/ (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x)) (pow B 2))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* (pow B 3) (+ (* -1 (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -1 (/ (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x)) (pow B 2))) (* -1 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) (pow B 4)))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (- (+ (* F F) 2) (* -2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (* 2 x) 2) #s(hole binary64 2))
#s(approx (+ (* 2 x) 2) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (+ (* B (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))) (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* B (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (+ (* B (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))) (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* B (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))) (* x (+ (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* B (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (+ (* B (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))) (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* B (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))) (* x (+ (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* B (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* x (+ (* -5/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* B (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7)))))))))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))) 1)) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) 1)) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* x (+ (* -5/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* (pow B 2) (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) 1)) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* x (+ (* -5/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* (pow B 2) (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* x (+ (* (pow B 2) (* x (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* x (+ (* x (+ (* (pow B 2) (* x (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7)))))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* x (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7)))))))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 1/4 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/12 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/6 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 1/4 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/12 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (* -1/3 x) #s(hole binary64 (* -1/3 x)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* (pow B 2) (* x (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* 7/240 (* (* (pow B 2) (* F x)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* x (+ (* -7/144 (* (* (pow B 2) (* F x)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* 7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* x (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* x (- (+ 1/45 (* 7/240 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* x (- (+ 1/45 (* x (- (* -7/144 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/240 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (* x 1/45) #s(hole binary64 (* 1/45 x)))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/360 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* x (- (* 7/240 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* x (- (* x (- (* -7/144 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/240 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 7/360 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* -7/240 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -7/240 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 7/144 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))))))))))
#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 (* (/ 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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (* 2 x) 2) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) 2) #s(hole binary64 (* x (+ 2 (* 2 (/ 1 x))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (* x (- (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) 1)) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* x (- (+ (* B (+ 1/3 (* 1/45 (pow B 2)))) (+ (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ (* B (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))) (/ 1 B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* B (+ 1/3 (* 1/45 (pow B 2)))) (+ (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (+ (/ (* B (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* B (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))) (/ 1 B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* B (+ 1/3 (* 1/45 (pow B 2)))) (+ (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (+ (/ (* B (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* B (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* B (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))) (/ 1 B)))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) 1))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))) 1))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))) 1))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* (pow B 2) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))) 1))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 2) (* x (+ 1/3 (* 1/45 (pow B 2)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* x (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* x (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* x (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* (pow B 2) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (* x (+ 1/3 (* 1/45 (pow B 2)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* x (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* x (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* x (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* (pow B 2) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (* 1/45 (pow B 2))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/45 (pow B 2)) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/45 (pow B 2)) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/45 (pow B 2)) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* x (+ 1/3 (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/12 (* (/ (* F (+ (* 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)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* x (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* 1/45 (pow B 2))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* x (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* 1/45 (pow B 2)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* x (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* 1/45 (pow B 2))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* x (+ 1/45 (* 7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* x (- (+ 1/45 (* -7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5)))))) (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* x (- (+ 1/45 (* 7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7)))))) (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/720 (* (/ (* F (+ (* 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)) (sqrt (/ 1 (pow x 7))))) (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* 7/720 (* (/ (* F (+ (* 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)) (sqrt (/ 1 (pow x 7))))))))))
#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 (* (/ 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))) (+ (* 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (/ (* x (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))) B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* B (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (+ (* B (- (* -1/45 (pow B 2)) 1/3)) (/ 1 B)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* B (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (+ (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))) (/ (* B (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))))) x)) (+ (* B (- (* -1/45 (pow B 2)) 1/3)) (/ 1 B)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt x))) (* B (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* B (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (+ (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))) (/ (* B (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))))) x)) (+ (* B (- (* -1/45 (pow B 2)) 1/3)) (/ 1 B)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (+ (* -1 (/ (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* (pow B 2) (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* (pow B 2) (* x (- (* -1/45 (pow B 2)) 1/3))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* (pow B 2) (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* (pow B 2) (* x (- (* -1/45 (pow B 2)) 1/3))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (* (pow B 2) (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x))))) (pow x 3))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (* -1/45 (pow B 2)) 1/3)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (+ (* -1 (/ (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)) (* -1/45 (pow B 2))) 1/3)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (+ (* -1 (/ (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))) x)) (* -1/45 (pow B 2))) 1/3)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))) (pow x 3))) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))) x)) (* -1/45 (pow B 2))) 1/3)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (* x (- (* -1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) 1/3)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)) 1/3)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) x)) 1/3)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* 1/12 (* (/ (* 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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1/45 (pow B 2)) (* -7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x))))) x)) (* -1/45 (pow B 2)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))))) x)) (* -1/45 (pow B 2)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* -1 (* x (- (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) 1/45)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (* -7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)) 1/45)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))))) x)) 1/45)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -1 (/ (- (* 7/720 (* (/ (* 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))))) (sqrt -1/2)) (sqrt (/ 1 x)))) (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x)))) (pow x 3))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1 (/ (+ (* -7/720 (* (/ (* 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))))) (sqrt -1/2)) (sqrt (/ 1 x)))) (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x)))) (pow x 3))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#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 (* (/ 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:

Time	Variable		Point	Expression
39.0ms	F	@	inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (sin B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ (* 2 x) 2) (* 2 x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* 1/6 F) 1/6 (* -1/3 x) -1/3 (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* x 1/45) 1/45 (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* F -7/360) -7/360 (* B B) (+ (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))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)) (/ 1 2))
37.0ms	x	@	inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (sin B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ (* 2 x) 2) (* 2 x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* 1/6 F) 1/6 (* -1/3 x) -1/3 (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* x 1/45) 1/45 (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* F -7/360) -7/360 (* B B) (+ (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))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)) (/ 1 2))
32.0ms	F	@	-inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (sin B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ (* 2 x) 2) (* 2 x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* 1/6 F) 1/6 (* -1/3 x) -1/3 (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* x 1/45) 1/45 (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* F -7/360) -7/360 (* B B) (+ (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))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)) (/ 1 2))
28.0ms	x	@	-inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (sin B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ (* 2 x) 2) (* 2 x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* 1/6 F) 1/6 (* -1/3 x) -1/3 (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* x 1/45) 1/45 (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* F -7/360) -7/360 (* B B) (+ (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))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)) (/ 1 2))
13.0ms	x	@	0	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (sin B) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ (* 2 x) 2) (* 2 x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* 1/6 F) 1/6 (* -1/3 x) -1/3 (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* x 1/45) 1/45 (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* F -7/360) -7/360 (* B B) (+ (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))))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)) (/ 1 2))

rewrite436.0ms (5.1%)

Memory

32.1MiB live, 465.7MiB allocated; 69ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3062	51352
0	3170	49829
0	9516	49829

Stop Event

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

Counts

768 → 808

Calls

Call 1

Inputs
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(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 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))
(.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))
F
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/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)
#s(literal -2 binary64)
#s(literal -1/2 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)
(-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))
(sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))
(+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))
(+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))
(*.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 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B)
(-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x)
(+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F))
(.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B))
(+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B)))
(-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (*.f64 #s(literal -1/3 binary64) x))
(.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(*.f64 #s(literal 1/6 binary64) F)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/3 binary64) x)
#s(literal -1/3 binary64)
(.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (*.f64 B B))
(+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(*.f64 x #s(literal 1/45 binary64))
#s(literal 1/45 binary64)
(neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))
(.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(*.f64 F #s(literal -7/360 binary64))
#s(literal -7/360 binary64)
(*.f64 B B)
#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)
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 x 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))
(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))
(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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (sqrt (/ 1 (- 2 (* -2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (- 2 (* -2 x)) 3)))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #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)))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (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 #s(hole binary64 F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (- 2 (* -2 x))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (pow F 2)) (* -2 x))))
#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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* B (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) (* F (+ (* B (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x)))))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* B (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) (* F (+ (* B (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* B (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* B (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) (* F (+ (* B (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (+ (* B (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* 3/8 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* B (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))))) (/ x B))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))) (* (pow B 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) (* (pow F 2) (+ (* 3/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))) (* (pow B 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x)))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* F (+ (* (pow B 2) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))) (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* F (+ (* (pow B 2) (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* (pow F 2) (+ (* (pow B 2) (* (pow F 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))) (* (pow B 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))) (* (pow B 2) (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (* 1/45 (* (pow B 2) x)) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x)))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (+ (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (pow F 2) (+ (* 7/960 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* 1/3 x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* F (+ (* -1/12 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* 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))))))))) (* -1/3 x))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* F (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -1/12 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 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)))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* 1/6 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/12 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -5/96 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* 1/16 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (* 1/6 F) #s(hole binary64 (* 1/6 F)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* 1/45 (* (pow B 2) x))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/45 (* (pow B 2) x)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* -7/720 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 1/45 (* (pow B 2) x)) (* F (+ (* 7/360 (* (pow B 2) (sqrt (/ 1 (+ 2 (* 2 x)))))) (* (pow F 2) (+ (* -7/720 (* (pow B 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 7/960 (* (* (pow B 2) (pow F 2)) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* 1/45 x)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ (* 7/360 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))) (* 1/45 x))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ (* 1/45 x) (* F (- (* -7/720 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ (* 1/45 x) (* F (- (* (pow F 2) (- (* 7/960 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* F (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* F (- (* -7/720 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* F (- (* (pow F 2) (- (* 7/960 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* F (- (* (pow F 2) (- (* (pow F 2) (- (* -7/1152 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7))))) (* -7/960 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))) (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* F (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* 7/720 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -7/960 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))) (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* F (+ (* -7/360 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* 7/720 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* (pow F 2) (+ (* -7/960 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5)))) (* 7/1152 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 7)))))))))))))
#s(approx (* F -7/360) #s(hole binary64 (* -7/360 F)))
#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 (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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ 1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ 1 (pow F 2)))) (* -2 (/ x (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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)))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 F))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x)))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* B (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ 1 B) (/ (* B (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (+ (* B (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ 1 B) (+ (/ (* B (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* B (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4))))))) (/ x B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (+ (* B (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ 1 B) (+ (/ (* B (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* B (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* B (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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))))))))) (/ x B))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ 1 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x)))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2))))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4))))))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* (pow B 2) (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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))))))))) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ 1 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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))) (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* (pow B 2) (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))) (+ (/ (* (pow B 2) (+ (* -1/12 (+ 2 (* 2 x))) (* -7/720 (* (pow B 2) (+ 2 (* 2 x)))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* -1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (* -7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))))) (pow F 4)) (/ (* (pow B 2) (+ (* -1/12 (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3))) (* -7/720 (* (pow B 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)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (* (pow B 2) (+ 7/360 (* 1/45 x)))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ (* -1/12 (/ (+ (* 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))) (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* -7/720 (/ (* (pow B 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))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- 1/6 (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ 1/6 (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2)))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))) (* -1/3 x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/12 (/ (+ (* 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)))))) (* -1/3 x))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 1/6))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 1/6 (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 1/6 (+ (* -1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -1/12 (/ (+ (* 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))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* (pow B 2) (+ 7/360 (* 1/45 x)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (* (pow B 2) (+ 7/360 (* 1/45 x))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (* (pow B 2) (+ 7/360 (* 1/45 x)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* -7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* -7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* -7/720 (/ (* (pow B 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))) (* (pow B 2) (+ 7/360 (* 1/45 x))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ 7/360 (* 1/45 x))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/45 x)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ 7/360 (+ (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/45 x))) (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ 7/360 (+ (* -7/720 (/ (+ (* 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))) (* 1/45 x))) (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 7/360))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (+ 7/360 (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (+ 7/360 (* -7/720 (/ (+ (* 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)))) (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 -7/360))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) 7/360)))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) 7/360)))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 7/720 (/ (+ (* 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))))) 7/360)))
#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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 -1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4)))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))))) 1)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ -1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 -1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) 1)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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))))) 1)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ 1 x)) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* B (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* B (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))) (+ (/ 1 B) (/ x B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (+ (* B (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* B (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* B (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)))))) (+ (/ 1 B) (/ x B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (+ (* B (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* B (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* B (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* B (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))) (+ (/ 1 B) (/ x B)))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ 1 x))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))) (+ 1 x))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)))))) (+ 1 x))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))) (+ 1 x))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) 1)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (+ (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))) 1)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)))))) 1)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (- (+ (* 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))) (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))) 1)))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ 2 (* 2 x)))) (* 1/12 (+ 2 (* 2 x))))) (pow F 2)) (+ (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (* 1/12 (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))))) (pow F 4)) (/ (* (pow B 2) (+ (* 7/720 (* (pow B 2) (+ (* 1/2 (* (+ 2 (* 2 x)) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))))) (pow (+ 2 (* 2 x)) 3)))) (* 1/12 (+ (* 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)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (* (pow B 2) (- (* 1/45 x) 7/360)) (+ 1/6 (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* (pow B 2) (- (* 1/45 x) 7/360)))) (+ 1/6 (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* (pow B 2) (- (* 1/45 x) 7/360)))))) (+ 1/6 (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* 7/720 (/ (* (pow B 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))) (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ (* 1/12 (/ (+ (* 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))) (* (pow B 2) (- (* 1/45 x) 7/360)))))))) (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) (+ 1/6 (* -1/3 x)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/12 (/ (+ (* 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))))) (+ 1/6 (* -1/3 x)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 -1/6))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) 1/6)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))) 1/6)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (- (+ (* 1/12 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* 1/12 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/12 (/ (+ (* 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))))) 1/6)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/45 x) 7/360))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (* (pow B 2) (- (* 1/45 x) 7/360)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (* (pow B 2) (- (* 1/45 x) 7/360))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/720 (/ (* (pow B 2) (+ 2 (* 2 x))) (pow F 2))) (+ (* 7/720 (/ (* (pow B 2) (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2)))) (pow F 4))) (+ (* 7/720 (/ (* (pow B 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))) (* (pow B 2) (- (* 1/45 x) 7/360)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* 1/45 x) 7/360)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* 1/45 x)) 7/360)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* 1/45 x)) (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (+ (* 7/720 (/ (+ (* 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))) (* 1/45 x)) (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 -7/360))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/720 (/ (+ 2 (* 2 x)) (pow F 2))) 7/360)))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/720 (/ (+ (* 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))) (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 7/360))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 7/360 (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ 7/360 (+ (* -7/720 (/ (+ 2 (* 2 x)) (pow F 2))) (+ (* -7/720 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (pow F 4))) (* -7/720 (/ (+ (* 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))))))))
#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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))))))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) 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))))))) (* -1/3 x)))) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) 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/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x)))) x) B)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #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/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x)))) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #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/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (- (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (- (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))) (* -1/3 x))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (* B B) #s(hole binary64 (pow B 2)))
#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 (/ x B) #s(hole binary64 (/ x 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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (/ (* 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))))
#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/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* (pow B 3) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* (pow B 3) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* (pow B 3) (- (+ (* 1/45 x) (+ (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (/ F (pow B 4)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (/ x (pow B 4))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* (pow B 4) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (+ (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (/ F (pow B 4)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (/ x (pow B 4))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 4) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (+ (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* (/ F (pow B 4)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 4) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 4) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* (pow B 2) (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* (pow B 2) (- (+ (* 1/45 x) (* 1/6 (* (/ F (pow B 2)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))))) (+ (* -1/3 (/ x (pow B 2))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))))))
#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 (* (/ 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 (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* (pow B 3) (+ (* -1 (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (* -1 (/ (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x)) (pow B 2))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* (pow B 3) (+ (* -1 (- (* 1/45 x) (* -7/360 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))) (+ (* -1 (/ (- (* 1/6 (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))) (* -1/3 x)) (pow B 2))) (* -1 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) (pow B 4)))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (- (+ (* F F) 2) (* -2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (* 2 x) 2) #s(hole binary64 2))
#s(approx (+ (* 2 x) 2) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (* 2 x) #s(hole binary64 (* 2 x)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (+ (* B (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))) (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* B (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (+ (* B (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))) (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* B (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))) (* x (+ (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* B (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (+ (* B (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))) (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* B (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))) (* x (+ (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* B (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* x (+ (* -5/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* B (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7)))))))))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))) 1)) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) 1)) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* x (+ (* -5/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* (pow B 2) (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) 1)) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (+ (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* x (+ (* -5/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* (pow B 2) (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* (pow B 2) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* x (+ (* (pow B 2) (* x (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (+ (* x (+ (* x (+ (* (pow B 2) (* x (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7)))))))) (* (pow B 2) (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))) (* (pow B 2) (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (+ (* x (+ (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (+ (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* x (+ (* -5/12 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/144 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7)))))))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 1/4 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ 1/3 (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/12 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/6 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 1/4 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* 1/6 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* -1/6 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/12 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 1/4 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (* -1/3 x) #s(hole binary64 (* -1/3 x)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* (pow B 2) (* x (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* 7/240 (* (* (pow B 2) (* F x)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (+ (* 7/360 (* (* (pow B 2) F) (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* x (+ (* -7/144 (* (* (pow B 2) (* F x)) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 7/240 (* (* (pow B 2) F) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* (pow B 2) (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* 7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* x (- 1/45 (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* x (- (+ 1/45 (* 7/240 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (- (* x (- (+ 1/45 (* x (- (* -7/144 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/240 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (* x 1/45) #s(hole binary64 (* 1/45 x)))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/360 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* x (- (* 7/240 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* x (- (* x (- (* -7/144 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* -7/240 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))) (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* 7/360 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* -7/240 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))) (* x (+ (* 7/360 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -7/240 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))) (* 7/144 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))))))))))
#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 (* (/ 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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (* 2 x) 2) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) 2) #s(hole binary64 (* x (+ 2 (* 2 (/ 1 x))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (/ (* x (- (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) 1)) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* x (- (+ (* B (+ 1/3 (* 1/45 (pow B 2)))) (+ (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ (* B (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))) (/ 1 B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* B (+ 1/3 (* 1/45 (pow B 2)))) (+ (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (+ (/ (* B (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* B (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))) (/ 1 B)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (+ (* B (+ 1/3 (* 1/45 (pow B 2)))) (+ (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (+ (/ (* B (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* B (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* B (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))) (/ 1 B)))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) 1))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))) 1))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))) 1))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* (pow B 2) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))) 1))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* (pow B 2) (* x (+ 1/3 (* 1/45 (pow B 2)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* x (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* x (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* x (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* (pow B 2) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* (pow B 2) (* x (+ 1/3 (* 1/45 (pow B 2)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* x (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* x (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* x (+ (* (pow B 2) (+ 1/3 (* 1/45 (pow B 2)))) (+ (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt x))))) (pow x 3)) (+ (/ (* (pow B 2) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt x))) (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt x))))) (pow x 4)) (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))) x)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (* 1/45 (pow B 2))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/45 (pow B 2)) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/45 (pow B 2)) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/45 (pow B 2)) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* x (+ 1/3 (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* x (+ 1/3 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/12 (* (/ (* F (+ (* 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)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/48 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* x (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* 1/45 (pow B 2))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* x (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* 1/45 (pow B 2)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* x (+ (* -7/2880 (* (/ (* (pow B 2) (* F (+ 2 (pow F 2)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (pow (+ 2 (pow F 2)) 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* 7/360 (* (* (pow B 2) (* F (sqrt 1/2))) (sqrt (/ 1 (pow x 3))))) (* 1/45 (pow B 2))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* x (+ 1/45 (* 7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* x (- (+ 1/45 (* -7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5)))))) (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* x (- (+ 1/45 (* 7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7)))))) (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/720 (* (/ (* F (+ (* 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)) (sqrt (/ 1 (pow x 7))))) (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 7/2880 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* 7/720 (* (/ (* F (+ (* 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)) (sqrt (/ 1 (pow x 7))))))))))
#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 (* (/ 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))) (+ (* 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (/ (* x (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))) B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* B (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (+ (* B (- (* -1/45 (pow B 2)) 1/3)) (/ 1 B)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* B (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (+ (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))) (/ (* B (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))))) x)) (+ (* B (- (* -1/45 (pow B 2)) 1/3)) (/ 1 B)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt x))) (* B (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* B (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (+ (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))) (/ (* B (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))))) x)) (+ (* B (- (* -1/45 (pow B 2)) 1/3)) (/ 1 B)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (+ (* -1 (/ (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) #s(hole binary64 (* -1 (* x (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* (pow B 2) (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* (pow B 2) (* x (- (* -1/45 (pow B 2)) 1/3))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* (pow B 2) (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* (pow B 2) (* x (- (* -1/45 (pow B 2)) 1/3))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (* (pow B 2) (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x))))) (pow x 3))) (+ (* (pow B 2) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) (/ (* (pow B 2) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt x))) (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt x))))) (pow x 2)))) x)) (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (* -1/45 (pow B 2)) 1/3)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (+ (* -1 (/ (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)) (* -1/45 (pow B 2))) 1/3)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (+ (* -1 (/ (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))) x)) (* -1/45 (pow B 2))) 1/3)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) #s(hole binary64 (* -1 (* x (- (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* -7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt x)))) (pow x 3))) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))) x)) (* -1/45 (pow B 2))) 1/3)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (* x (- (* -1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) 1/3)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)) 1/3)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))) x)) 1/3)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/96 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x))) (* 1/12 (* (/ (* 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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/48 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 1/6 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1/45 (pow B 2)) (* -7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x))))) x)) (* -1/45 (pow B 2)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -7/2880 (* (/ (* (pow B 2) (* F (* (sqrt -1) (+ 2 (pow F 2))))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 7/5760 (* (/ (* (pow B 2) (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/360 (* (* (pow B 2) (* F (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 x)))))) x)) (* -1/45 (pow B 2)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* -1 (* x (- (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) 1/45)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (* -7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)) 1/45)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (- (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))))) x)) 1/45)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (* 7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(hole binary64 (- (* -1 (/ (- (* 7/720 (* (/ (* 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))))) (sqrt -1/2)) (sqrt (/ 1 x)))) (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x)))) (pow x 3))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (+ (* -7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(hole binary64 (+ (* -1 (/ (+ (* -7/720 (* (/ (* 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))))) (sqrt -1/2)) (sqrt (/ 1 x)))) (* 7/5760 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt x)))) (pow x 3))) (+ (* -7/360 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) (* 7/2880 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3)))))))))
#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 (* (/ 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 (pow.f64 (neg.f64 (.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)) #s(literal 3 binary64))) (+.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 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))) (.f64 (neg.f64 (.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))))))
(+.f64 (neg.f64 (.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(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))))
#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 (neg.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))) (neg.f64 (sin.f64 B)))
(/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))
(.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))
F
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1/2 binary64)))
(-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))
(/.f64 (+.f64 (pow.f64 (.f64 F F) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (.f64 (.f64 F F) (.f64 F F)) (-.f64 #s(literal 4 binary64) (.f64 (.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 -2 binary64)
#s(literal -1/2 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 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F) x) B))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F) x)) (neg.f64 B))
(/.f64 (-.f64 (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F) x) B)
(-.f64 (/.f64 (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F) B) (/.f64 x B))
(-.f64 (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F) x)
(.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)
(pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))
(pow.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 F F) (.f64 F F)) (.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))
(+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) x) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (-.f64 #s(literal 4 binary64) (.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))))
(+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))
(*.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 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)) x) B))
(/.f64 (neg.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)) x)) (neg.f64 B))
(/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)) x) B)
(-.f64 (/.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)) B) (/.f64 x B))
(-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)) x)
(/.f64 (+.f64 (pow.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)) F) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B))) (-.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)) F) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)) F)) (.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F)))))
(+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (.f64 (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)) F))
(.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) #s(literal 3 binary64)) (pow.f64 (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x))) (-.f64 (.f64 (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (*.f64 B B))))))
(+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 B B)))
(-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))) (*.f64 #s(literal -1/3 binary64) x))
(.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)))
(*.f64 #s(literal 1/6 binary64) F)
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/3 binary64) x)
#s(literal -1/3 binary64)
(.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (*.f64 B B))
(/.f64 (+.f64 (pow.f64 (.f64 x #s(literal 1/45 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 x #s(literal 1/45 binary64))) (-.f64 (.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)))) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))) (.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64))))))))
(+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal -1 binary64)))))
(*.f64 x #s(literal 1/45 binary64))
#s(literal 1/45 binary64)
(neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64))))
(.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) #s(literal -1 binary64)))
(*.f64 F #s(literal -7/360 binary64))
#s(literal -7/360 binary64)
(*.f64 (fabs.f64 B) (fabs.f64 B))
(*.f64 (neg.f64 B) (neg.f64 B))
(*.f64 B B)
(pow.f64 B #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 B) #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 (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) (-.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)
(/.f64 (+.f64 (pow.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (-.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))) (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 (neg.f64 x) (neg.f64 B))
(/.f64 x B)
(.f64 (/.f64 F (sin.f64 B)) (pow.f64 (+.f64 (+.f64 (.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))
(pow.f64 (+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x))) #s(literal -1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) x) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(+.f64 (+.f64 (.f64 F F) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (.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)))))) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (.f64 F (+.f64 (.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) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 F (+.f64 (.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) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 F (+.f64 (.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) (+.f64 (.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) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (+.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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (+.f64 (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (+.f64 (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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) (+.f64 (.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)
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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) (+.f64 (.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)) -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) (+.f64 (.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) (+.f64 (.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 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))
#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 (+.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)))))) (/.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 (+.f64 (.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) (+.f64 (.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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 F (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 F F) B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 (pow.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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 F (+.f64 (.f64 (pow.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) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.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) B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #s(literal -1 binary64) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 F (+.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))))))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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))))))))) x))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (+.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 (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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 (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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) (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 F F) (+.f64 (.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) (+.f64 (.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 (sqrt (+ (+ (* 2 x) 2) (* F F))) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (+.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.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 -1 binary64)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (+.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (+.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal 1/16 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 (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))) x) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 B (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))) (.f64 F (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 (pow.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 x B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 B (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))) (.f64 F (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (+.f64 (.f64 (pow.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) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.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 B (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))))))))) (/.f64 x B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 B (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))) (.f64 F (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (+.f64 (.f64 (pow.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) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.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 B (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 3/8 binary64) (.f64 (pow.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))))) (.f64 B (+.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))))))) (/.f64 x B)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 (.f64 F F) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 (.f64 F F) (+.f64 (.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 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))) (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))) x))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 (.f64 F F) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 (.f64 F F) (+.f64 (.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 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))) (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (.f64 F (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (*.f64 #s(literal -1/3 binary64) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 F (+.f64 (.f64 (.f64 B B) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (*.f64 #s(literal -1/3 binary64) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 F (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 (.f64 F F) (+.f64 (.f64 (.f64 B B) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (*.f64 #s(literal -1/3 binary64) x)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 F (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))) (*.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 F (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))))))))) (*.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 F (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (+.f64 (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))))))) (*.f64 #s(literal -1/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (*.f64 #s(literal 1/3 binary64) x))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (.f64 F (+.f64 (.f64 #s(literal -1/12 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (.f64 F (+.f64 (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal 1/16 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 F (+.f64 (.f64 #s(literal -1/12 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 F (+.f64 (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 #s(literal 1/16 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 (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 F (+.f64 (.f64 #s(literal 1/6 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -1/12 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -5/96 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 1/16 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
#s(approx (* 1/6 F) (*.f64 #s(literal 1/6 binary64) F))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 #s(literal 1/45 binary64) (.f64 (*.f64 B B) x)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 F (+.f64 (.f64 #s(literal -7/720 binary64) (.f64 (pow.f64 (.f64 B F) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 (.f64 B B) x)) (.f64 F (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal 7/960 binary64) (.f64 (pow.f64 (.f64 B F) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (*.f64 #s(literal 1/45 binary64) x))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))) (.f64 #s(literal 1/45 binary64) x)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 F (-.f64 (.f64 #s(literal -7/720 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 F (-.f64 (.f64 (.f64 F F) (-.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 7/720 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))) (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 F (-.f64 (.f64 #s(literal -7/720 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64))))) (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 F (-.f64 (.f64 (.f64 F F) (-.f64 (.f64 #s(literal 7/960 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 7/720 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))) (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 F (-.f64 (.f64 (.f64 F F) (-.f64 (.f64 (.f64 F F) (-.f64 (.f64 #s(literal -7/1152 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 -7/960 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))))) (.f64 #s(literal 7/720 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))) (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 F (+.f64 (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 #s(literal 7/720 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 (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 F (+.f64 (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -7/960 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64))))) (.f64 #s(literal 7/720 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 F (+.f64 (.f64 #s(literal -7/360 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 7/720 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -3 binary64)))) (.f64 (.f64 F F) (+.f64 (.f64 #s(literal -7/960 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) #s(literal -5 binary64)))) (.f64 #s(literal 7/1152 binary64) (.f64 (.f64 F F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -7 binary64))))))))))))
#s(approx (* F -7/360) (*.f64 #s(literal -7/360 binary64) F))
#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 (+.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 (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 F (+.f64 (.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) (+.f64 (.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 (+.f64 (.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) (+.f64 (.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) (+.f64 (.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 (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) (+.f64 (.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) (+.f64 (.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) (+.f64 (.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) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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/2 binary64) (/.f64 (-.f64 (.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)))) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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/2 binary64) (/.f64 (-.f64 (.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))))) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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/2 binary64) (/.f64 (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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/2 binary64) (/.f64 (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (pow.f64 F #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (pow.f64 F #s(literal -1 binary64)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))))) F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (pow.f64 F #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))) F))
#s(approx (- (+ (* F F) 2) (* -2 x)) (*.f64 F F))
#s(approx (- (+ (* F F) 2) (* -2 x)) (.f64 (.f64 F F) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 x (*.f64 F F))))))
#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 (+.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))) (/.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 #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/2 binary64) (/.f64 (+.f64 (.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 (+.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/2 binary64) (/.f64 (+.f64 (.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/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (pow.f64 B #s(literal -1 binary64)))) (/.f64 x B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B (pow.f64 F #s(literal 6 binary64))))) (pow.f64 B #s(literal -1 binary64))))) (/.f64 x B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 #s(literal 1 binary64) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.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)))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.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 (+.f64 (.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)))))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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))))))) x))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 #s(literal 1 binary64) (+.f64 (.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 (+.f64 (.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)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (pow.f64 F #s(literal -1 binary64)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (/.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.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 (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 (sqrt (+ (+ (* 2 x) 2) (* F F))) F)
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 F (+.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))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 F (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (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 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 F (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (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 #s(literal 1/16 binary64) (/.f64 (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 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (*.f64 F F))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (.f64 (.f64 F F) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 x (.f64 F F))) (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x)))) x) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 B (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (pow.f64 B #s(literal -1 binary64)) (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (*.f64 F F))))) (/.f64 x B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (+.f64 (.f64 B (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (pow.f64 B #s(literal -1 binary64)) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 x B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B (pow.f64 F #s(literal 6 binary64))))) (+.f64 (.f64 B (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (pow.f64 B #s(literal -1 binary64)) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 B (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 x B)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x)))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F))))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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)))))))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))))))) x))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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)))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (*.f64 F F))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))))) (.f64 F F)) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal -1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal -7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (.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 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (.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 #s(literal -1/12 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))))))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F)))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (.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/3 binary64) x)))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (.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/12 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal -1/3 binary64) x)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(literal 1/6 binary64))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (.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)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (.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/12 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 1/45 binary64) x))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (.f64 (.f64 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 1/45 binary64) x))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 #s(literal -7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal 1/45 binary64) x)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 1/45 binary64) x)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (+.f64 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 1/45 binary64) x))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (+.f64 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.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/45 binary64) x))) (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (+.f64 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/45 binary64) x))) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.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)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(literal 7/360 binary64))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.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 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.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)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(literal -7/360 binary64))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (-.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))) #s(literal 7/360 binary64)))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.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))))) #s(literal 7/360 binary64)))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.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 7/720 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))) #s(literal 7/360 binary64)))
#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)))) (+.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 (.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/2 binary64) (/.f64 (+.f64 (.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 (.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/2 binary64) (/.f64 (+.f64 (.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/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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) (+.f64 (.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 (+.f64 (.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) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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) (+.f64 (.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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal -1 binary64))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))) #s(literal 1 binary64)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (pow.f64 F #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))))) #s(literal 1 binary64)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))))) (pow.f64 F #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) (*.f64 F 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 #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 (+.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 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 (+.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/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B (pow.f64 F #s(literal 6 binary64)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.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 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.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 (+.f64 (.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 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1 binary64) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))) #s(literal 1 binary64)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (+.f64 (.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 (+.f64 (.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))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.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 (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 (sqrt (+ (+ (* 2 x) 2) (* F F))) (*.f64 #s(literal -1 binary64) F))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (.f64 F (+.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)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (.f64 F (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (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 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (.f64 F (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (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 #s(literal 1/16 binary64) (/.f64 (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 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F)))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 #s(literal 1 binary64) x)) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 B (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (*.f64 F F)))) (/.f64 (+.f64 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (+.f64 (.f64 B (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 B (pow.f64 F #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B (pow.f64 F #s(literal 6 binary64))))) (+.f64 (.f64 B (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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 B (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1 binary64) x) B)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)))) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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 binary64) x)))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1 binary64) x)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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))))))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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))))))))) #s(literal 1 binary64)))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (*.f64 F F))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)))) (.f64 #s(literal 1/12 binary64) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))))) (.f64 F F)) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.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 B B) (+.f64 (.f64 #s(literal 7/720 binary64) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/12 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (.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 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))))))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (.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 #s(literal 1/12 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))))))))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (.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/6 binary64) (*.f64 #s(literal -1/3 binary64) x))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (-.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (.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/12 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/6 binary64) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(literal -1/6 binary64))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (-.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))) #s(literal 1/6 binary64)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (-.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (.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))))) #s(literal 1/6 binary64)))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (-.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (.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/12 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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)))))) #s(literal 1/6 binary64)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 (.f64 B B) (-.f64 (*.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 B B) (-.f64 (*.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x))) (.f64 F F))) (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.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 #s(literal 7/720 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) x) #s(literal 7/360 binary64)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal 1/45 binary64) x)) #s(literal 7/360 binary64)))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.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/45 binary64) x)) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (+.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 1/45 binary64) x)) (+.f64 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.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))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) #s(literal -7/360 binary64))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))) #s(literal 7/360 binary64)))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.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 7/360 binary64) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal 7/720 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.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))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) #s(literal 7/360 binary64))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 #s(literal 7/360 binary64) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F)))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.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)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 #s(literal 7/360 binary64) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -7/720 binary64) (/.f64 (+.f64 (.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 -7/720 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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))))))))
#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 (+.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 #s(literal 1/2 binary64) (/.f64 (+.f64 (.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 (+.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/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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) (+.f64 (.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 (+.f64 (.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) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 #s(literal 1/3 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 #s(literal -1/9 binary64) x) (.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 #s(literal 1/3 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 #s(literal -1/9 binary64) x) (+.f64 (.f64 #s(literal 2/15 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (+.f64 (.f64 #s(literal -1/5040 binary64) F) (+.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 #s(literal -1/3 binary64) (+.f64 (.f64 #s(literal -1/9 binary64) x) (.f64 #s(literal 2/15 binary64) x))) (+.f64 (.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) (+.f64 (.f64 #s(literal 1/3 binary64) x) (.f64 (.f64 B B) (+.f64 (.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) (+.f64 (.f64 #s(literal 1/3 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/9 binary64) x) (+.f64 (.f64 #s(literal 2/15 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/3 binary64) (+.f64 (.f64 #s(literal -1/9 binary64) x) (.f64 #s(literal 2/15 binary64) x))) (+.f64 (.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) (+.f64 (.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) (+.f64 (.f64 #s(literal -1/3 binary64) (+.f64 (.f64 #s(literal -1/9 binary64) x) (.f64 #s(literal 2/15 binary64) x))) (+.f64 (.f64 #s(literal -2/45 binary64) x) (.f64 #s(literal 17/315 binary64) x))))) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))) B))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (/.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x))))))))) B))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (/.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) F) (+.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal -1 binary64) (.f64 (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))))))))) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.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 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (+.f64 (.f64 #s(literal 1/3 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)))) (+.f64 (.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 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (+.f64 (.f64 #s(literal 1/3 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)))) (+.f64 (.f64 #s(literal -1/9 binary64) x) (+.f64 (.f64 #s(literal 2/15 binary64) x) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))) (+.f64 (.f64 #s(literal -1/5040 binary64) F) (+.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (+.f64 (.f64 #s(literal -1/9 binary64) x) (.f64 #s(literal 2/15 binary64) x))) (+.f64 (.f64 #s(literal -2/45 binary64) x) (.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))) x) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (-.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))) x) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 #s(literal -1/3 binary64) x)))) x) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))) (*.f64 #s(literal -1/3 binary64) x)))) x) B))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 #s(literal -1/3 binary64) x)))) x))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))) (*.f64 #s(literal -1/3 binary64) x)))) x))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 #s(literal -1/3 binary64) x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))) (*.f64 #s(literal -1/3 binary64) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (*.f64 #s(literal -1/3 binary64) x))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))) (.f64 #s(literal -1/3 binary64) x))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (*.f64 #s(literal -1/3 binary64) x)))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (-.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))) (.f64 #s(literal -1/3 binary64) x)))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))))
#s(approx (* B B) (*.f64 B 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 (+.f64 (.f64 #s(literal -1/6 binary64) x) (.f64 (.f64 B B) (-.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal -1/6 binary64) x) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal -1/6 binary64) x))) (+.f64 (.f64 #s(literal 1/120 binary64) x) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal 1/24 binary64) x) (+.f64 (.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 #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 (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/24 binary64) x) (+.f64 (.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 (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal 1/24 binary64) x) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/720 binary64) x) (+.f64 (.f64 #s(literal -1/6 binary64) (-.f64 (.f64 #s(literal 1/24 binary64) x) (+.f64 (.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 (.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))))))))) (+.f64 (.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) (+.f64 (.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) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 (.f64 B B) (+.f64 (.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) (+.f64 (.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) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 (.f64 B B) (+.f64 (.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 (/ x B) (/.f64 x B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) F) (+.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))))) 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) (+.f64 (.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) (+.f64 (.f64 #s(literal -1/5040 binary64) F) (+.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal 1/6 binary64) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F))))))) (+.f64 (.f64 #s(literal -1/36 binary64) F) (.f64 #s(literal 1/120 binary64) F)))) (*.f64 #s(literal -1/6 binary64) F)))) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (-.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (/.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x))))))
#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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 (pow.f64 B #s(literal 3 binary64)) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 (pow.f64 B #s(literal 3 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 (pow.f64 B #s(literal 3 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (/.f64 F (pow.f64 B #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (/.f64 x (pow.f64 B #s(literal 4 binary64))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (/.f64 F (pow.f64 B #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (/.f64 x (pow.f64 B #s(literal 4 binary64))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 (/.f64 F (pow.f64 B #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (pow.f64 B #s(literal 4 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 (.f64 B B) (-.f64 (+.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal 1/6 binary64) (.f64 (/.f64 F (.f64 B B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))) (+.f64 (.f64 #s(literal -1/3 binary64) (/.f64 x (.f64 B B))) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))))))
#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 (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 B #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 #s(literal -1/3 binary64) x)) (*.f64 B B)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 B #s(literal 3 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 #s(literal 1/45 binary64) x) (.f64 #s(literal -7/360 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))) x) (pow.f64 B #s(literal 4 binary64)))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (+.f64 (.f64 x (-.f64 (+.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 #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (+.f64 (.f64 x (-.f64 (+.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 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 (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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.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 #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.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 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 (/.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 (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))) (.f64 x (+.f64 (.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)) -1/2) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))) (.f64 x (+.f64 (.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 (- (+ (* F F) 2) (* -2 x)) (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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))))) (+.f64 (.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))))) (+.f64 (.f64 x (-.f64 (+.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 #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))))) (+.f64 (.f64 x (-.f64 (+.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 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 (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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 x (-.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 F 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) B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 (/.f64 (.f64 F x) 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 B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (-.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))) #s(literal 1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))) #s(literal 1 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))) (.f64 x (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))) (.f64 x (+.f64 (.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 (sqrt (+ (+ (* 2 x) 2) (* F F))) (sqrt.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (+.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (.f64 F F))) (.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (+.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (.f64 F F))) (.f64 x (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (+.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (.f64 F F))) (.f64 x (+.f64 (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))) (.f64 x (+.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 x (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 F F)))
#s(approx (+ (* 2 x) 2) #s(literal 2 binary64))
#s(approx (+ (* 2 x) 2) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))
#s(approx (* 2 x) (*.f64 #s(literal 2 binary64) x))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 B (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 B (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))) (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 B (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 B (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))) (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))) (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 B (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/144 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64)))))))))))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))))))) #s(literal 1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))))) #s(literal 1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/144 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))))) #s(literal 1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (+.f64 (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal -5/2 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/144 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 x (+.f64 (.f64 (.f64 B B) (.f64 x (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 B B) (.f64 x (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/144 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64)))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))))) (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))))))))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/144 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64)))))))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64))))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -5/12 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -5 binary64)))))))))))
#s(approx (* -1/3 x) (*.f64 #s(literal -1/3 binary64) x))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 (.f64 B B) (.f64 x (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 (.f64 x (+.f64 (.f64 #s(literal -7/144 binary64) (.f64 (.f64 (.f64 B B) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal 7/240 binary64) (.f64 (.f64 (.f64 B B) F) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))) (.f64 (.f64 B B) (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (.f64 x (-.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (.f64 x (-.f64 (+.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/240 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (-.f64 (.f64 x (-.f64 (+.f64 #s(literal 1/45 binary64) (.f64 x (-.f64 (.f64 #s(literal -7/144 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/240 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64)))))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (* x 1/45) (*.f64 #s(literal 1/45 binary64) x))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 x (-.f64 (.f64 #s(literal 7/240 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 x (-.f64 (.f64 x (-.f64 (.f64 #s(literal -7/144 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -7 binary64))))) (.f64 #s(literal -7/240 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -1 binary64))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 #s(literal 7/360 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -7/240 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -3 binary64)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) (.f64 x (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64))))) (.f64 x (+.f64 (.f64 #s(literal -7/240 binary64) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -5 binary64))))) (.f64 #s(literal 7/144 binary64) (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 F F)) #s(literal -7 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 (* (/ 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)))) (+.f64 (.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)))) (+.f64 (.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 #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)))) (+.f64 (.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 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 (/.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 (+.f64 (.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 (+.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -3 binary64)))) (.f64 x (+.f64 (.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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 x (-.f64 (+.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))))) (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 x (-.f64 (+.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))))) (+.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))))) (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.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 -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 (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.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 -3 binary64))))) (+.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 -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 (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (+.f64 (.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)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.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 -3 binary64))))) (+.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 -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 (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -1/2) (+.f64 (.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)) -1/2) (+.f64 (.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))))) (+.f64 (.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)) -1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 (.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 (.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))))) (+.f64 (.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) (+.f64 (.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 (+.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))))) (.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 (+.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))))) (+.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))))) (.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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 x (-.f64 (.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (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))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (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 -7 binary64))))) (.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 x (-.f64 (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.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))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) #s(literal 1 binary64))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (.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))))) (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 (.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 (.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))))) (+.f64 (.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 (sqrt (+ (+ (* 2 x) 2) (* F F))) (sqrt.f64 (*.f64 x #s(literal 2 binary64))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 x (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 x (+.f64 (.f64 #s(literal -1/8 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)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 x (+.f64 (.f64 #s(literal -1/8 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)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -3 binary64))) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (.f64 x (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))) (/.f64 (*.f64 F F) x)))))
#s(approx (+ (* 2 x) 2) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (* 2 x) 2) (.f64 x (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (/.f64 (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))) #s(literal 1 binary64))) B))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 x (-.f64 (+.f64 (.f64 B (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 B (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (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 -7 binary64))))) (+.f64 (.f64 B (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (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/96 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 4 binary64))) (/.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))) #s(literal 1 binary64))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))) #s(literal 1 binary64))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (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))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))))) #s(literal 1 binary64))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.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))) (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))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (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/96 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 4 binary64))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))))))) #s(literal 1 binary64))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 x (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 x (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (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))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 x (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.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))) (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))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (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/96 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 4 binary64))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)))))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 x (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 x (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 x (+.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B)))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (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/96 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 x))))) (pow.f64 x #s(literal 4 binary64))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 B B)) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 B B)) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (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 -7 binary64))))) (+.f64 (.f64 #s(literal 1/96 binary64) (.f64 (/.f64 (.f64 F (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 -7 binary64))))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (+.f64 (.f64 #s(literal 1/45 binary64) (.f64 B B)) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 x (+.f64 #s(literal 1/3 binary64) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 1/96 binary64) (.f64 (/.f64 (.f64 F (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 -7 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/96 binary64) (.f64 (/.f64 (.f64 F (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 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1/12 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 1/96 binary64) (.f64 (/.f64 (.f64 F (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 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 x (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 #s(literal 1/45 binary64) (.f64 B B)))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 x (+.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 #s(literal 1/45 binary64) (.f64 B B))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 x (+.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))) (+.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (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 -7 binary64))))) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 #s(literal 1/45 binary64) (.f64 B B)))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 x (+.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 x (-.f64 (+.f64 #s(literal 1/45 binary64) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))) (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 x (-.f64 (+.f64 #s(literal 1/45 binary64) (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 F (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 -7 binary64)))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 #s(literal 7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal -7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 F (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 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal -7/720 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (+.f64 (.f64 #s(literal -7/5760 binary64) (.f64 (/.f64 (.f64 F (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 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal -7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (+.f64 (.f64 #s(literal -7/5760 binary64) (.f64 (/.f64 (.f64 F (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 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (+.f64 #s(literal 2 binary64) (*.f64 F F))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (+.f64 (.f64 #s(literal -7/5760 binary64) (.f64 (/.f64 (.f64 F (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 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (+.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 #s(literal 7/720 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))))))))
#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 (* (/ 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)))) (+.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 -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)))) (+.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 -3 binary64))))) (+.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 -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)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (+.f64 (.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)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (+.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 -3 binary64))))) (+.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 -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))) (+.f64 (.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))) (+.f64 (.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))))) (+.f64 (.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))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (+.f64 (.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 (.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))))) (+.f64 (.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) (+.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 #s(literal -1 binary64) (.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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.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 #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.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)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.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 #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (+.f64 (.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 x))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (+.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))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 F (.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -1/2) (+.f64 (.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)) -1/2) (+.f64 (.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))))) (+.f64 (.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)) -1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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)) (+.f64 (.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)))) (+.f64 (.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 (+.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 (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.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 (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.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 #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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F 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))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x)) (pow.f64 B #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F 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 #s(literal 1/16 binary64) (.f64 (.f64 (/.f64 F 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))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)) (pow.f64 B #s(literal -1 binary64))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 F (.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 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (.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))))) (+.f64 (.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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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)) (+.f64 (.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)))) (+.f64 (.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 (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal 1/2 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 -2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1/8 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))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 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 -2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1/8 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))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal 3 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 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 -2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64)))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (.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 (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x (+.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/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x)) (+.f64 (.f64 B (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64))) (pow.f64 B #s(literal -1 binary64)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F 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 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x))))) x)) (+.f64 (.f64 B (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64))) (pow.f64 B #s(literal -1 binary64)))))))
#s(approx (/ (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) B) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (/.f64 F 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 B (+.f64 (.f64 #s(literal -1/96 binary64) (.f64 (/.f64 (.f64 F (.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 -7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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)))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F 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 B (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (.f64 B (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x)))))) x)) (+.f64 (.f64 B (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64))) (pow.f64 B #s(literal -1 binary64)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64))))))))
#s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 F (.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 (.f64 B B) (+.f64 (.f64 #s(literal -1/96 binary64) (.f64 (/.f64 (.f64 F (.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 -7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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)))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x)))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64))))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 #s(literal -1 binary64) (.f64 (.f64 B B) (.f64 x (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 F (.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 (.f64 B B) (+.f64 (.f64 #s(literal -1/96 binary64) (.f64 (/.f64 (.f64 F (.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 -7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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)))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x)))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 (.f64 B B) (.f64 x (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/96 binary64) (.f64 (/.f64 (.f64 F (.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 -7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) (/.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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))) (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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))))) (.f64 x x)))) x)) (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)) (.f64 #s(literal -1/45 binary64) (*.f64 B B))) #s(literal 1/3 binary64)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))) x)) (.f64 #s(literal -1/45 binary64) (*.f64 B B))) #s(literal 1/3 binary64)))))
#s(approx (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/96 binary64) (.f64 (/.f64 (.f64 F (.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 -7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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)))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))) x)) (.f64 #s(literal -1/45 binary64) (.f64 B B))) #s(literal 1/3 binary64)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1/3 binary64)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)) #s(literal 1/3 binary64)))))
#s(approx (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/96 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)) #s(literal 1/3 binary64)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/6 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/96 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/96 binary64) (.f64 (/.f64 (.f64 F (.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/12 binary64) (.f64 (/.f64 (.f64 F (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 1/6 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) (.f64 #s(literal -7/360 binary64) (.f64 (.f64 (.f64 B B) (*.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)) (.f64 #s(literal -1/45 binary64) (*.f64 B B))))))
#s(approx (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B)) (.f64 #s(literal -1 binary64) (.f64 x (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 (.f64 B B) (.f64 F (.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 #s(literal 7/360 binary64) (.f64 (.f64 (.f64 B B) (.f64 F (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))) x)) (.f64 #s(literal -1/45 binary64) (.f64 B B))))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1/45 binary64)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal -7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))) x)) #s(literal 1/45 binary64)))))
#s(approx (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (.f64 #s(literal -1 binary64) (.f64 x (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (.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))))))) x)) #s(literal 1/45 binary64)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (.f64 #s(literal 7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal -7/2880 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (.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))))))))
#s(approx (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 7/720 binary64) (.f64 (/.f64 (.f64 F (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 F (.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)))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (.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))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (.f64 #s(literal -7/360 binary64) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (.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)))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (+.f64 (.f64 #s(literal -7/5760 binary64) (.f64 (/.f64 (.f64 F (.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 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (.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))))))))
#s(approx (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -7/720 binary64) (.f64 (/.f64 (.f64 F (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (.f64 #s(literal 7/5760 binary64) (.f64 (/.f64 (.f64 F (.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)))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 #s(literal -7/360 binary64) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal 7/2880 binary64) (.f64 (/.f64 (.f64 F (.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))))))))
#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 (* (/ 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)))) (+.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)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.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 #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)))) (+.f64 (.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 x))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)))) (+.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))))))
#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))) (+.f64 (.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))) (+.f64 (.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))))) (+.f64 (.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))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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)) (+.f64 (.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)))) (+.f64 (.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)))))

eval201.0ms (2.3%)

Memory: -21.7MiB live, 258.9MiB allocated; 45ms collecting garbage
Compiler: Compiled 118 442 to 7 703 computations (93.5% saved)

prune122.0ms (1.4%)

Memory

24.2MiB live, 170.1MiB allocated; 9ms collecting garbage

Pruning

50 alts after pruning (49 fresh and 1 done)

	Pruned	Kept	Total
New	1 135	47	1 182
Fresh	8	2	10
Picked	4	1	5
Done	0	0	0
Total	1 147	50	1 197

Accuracy

99.9%

Counts

1 197 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.9%	(+.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))))))
	49.4%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
	72.8%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
	58.9%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
▶	81.7%	(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
	23.1%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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))))
	35.2%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
	33.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
	42.8%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
▶	44.1%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
	17.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
▶	47.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
	56.7%	(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (.f64 #s(literal -1 binary64) (/.f64 x B))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
	42.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
	49.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
	29.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
	42.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
	43.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
▶	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
	27.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
	19.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
	39.2%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
	17.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
	26.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
	26.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
	25.2%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (*.f64 F F))) #s(literal 1 binary64))) x) B))
	23.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
	19.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
	26.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))
▶	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))
	26.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))) #s(literal 1 binary64)))) B))
	18.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64))))) B))
	27.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #s(literal -1 binary64) x)) B))
✓	59.5%	#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))))
	34.3%	#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)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
	34.7%	#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)) #s(approx (sin B) B))))
	34.6%	#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 #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))))) x)) (sin.f64 B))))
	35.9%	#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B B)))) x)) (sin.f64 B))))
	34.6%	#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B B) x))))))) (sin.f64 B))))
	44.9%	#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) #s(approx (* (cos B) x) x)) (sin.f64 B))))
	51.8%	#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))))
	59.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 #s(approx (+ 1 (* (cos B) x)) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64))))) (sin.f64 B))))
	23.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
	24.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
	27.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
	34.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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)))
	25.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

Compiler

Compiled 5 128 to 3 340 computations (34.9% saved)

series83.0ms (1%)

Memory

-5.1MiB live, 87.2MiB allocated; 6ms collecting garbage

Counts

49 → 440

Calls

Call 1

Inputs
(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))
x
#s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
B
(sin.f64 B)
(/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))
(.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))
F
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/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)
#s(literal -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))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))
(/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B)
(-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))
#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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B)
(-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F)
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))))
#s(literal 1 binary64)
(sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (+.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 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 x B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
(/.f64 #s(literal -1 binary64) (sin.f64 B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))
(.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))
(/.f64 F (sin.f64 B))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))
(sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))
(+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))

Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (sqrt (/ 1 (- 2 (* -2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (- 2 (* -2 x)) 3)))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #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)))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (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 #s(hole binary64 F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (- 2 (* -2 x))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (pow F 2)) (* -2 x))))
#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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (+ (* 2 x) (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ 1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ 1 (pow F 2)))) (* -2 (/ x (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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)))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 F))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (pow F 2)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ x (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 -1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4)))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))))) 1)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ -1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 -1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) 1)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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))))) 1)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -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 (/ (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 B #s(hole binary64 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -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)))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ x B) #s(hole binary64 (/ x 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 (/ -1 (sin B)) #s(hole binary64 (/ -1 B)))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ (- (* -1/6 (pow B 2)) 1) B)))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ (- (* (pow B 2) (- (* -7/360 (pow B 2)) 1/6)) 1) B)))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ (- (* (pow B 2) (- (* (pow B 2) (- (* -31/15120 (pow B 2)) 7/360)) 1/6)) 1) B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (/ (* 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 (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 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 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* 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) (pow F 2))))))))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (- (+ (* F F) 2) (* -2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (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 (* (/ 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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) 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 (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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* x (+ 2 (/ (pow F 2) x)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))) (+ (* 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (pow F 2) x)) 2)))))

Calls

9 calls:

Time	Variable		Point	Expression
18.0ms	B	@	inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) (/ (cos B) (sin B)) (cos B) B (sin B) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) -1 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) 1 (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ 2 (* 2 x)) (* 2 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))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ -1 (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
15.0ms	x	@	-inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) (/ (cos B) (sin B)) (cos B) B (sin B) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) -1 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) 1 (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ 2 (* 2 x)) (* 2 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))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ -1 (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
12.0ms	F	@	-inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) (/ (cos B) (sin B)) (cos B) B (sin B) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) -1 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) 1 (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ 2 (* 2 x)) (* 2 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))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ -1 (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
5.0ms	B	@	-inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) (/ (cos B) (sin B)) (cos B) B (sin B) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) -1 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) 1 (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ 2 (* 2 x)) (* 2 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))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ -1 (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
4.0ms	x	@	inf	((+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) (/ (cos B) (sin B)) (cos B) B (sin B) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) F (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (- (+ (* F F) 2) (* -2 x)) (+ (* F F) 2) (* F F) 2 (* -2 x) -2 -1/2 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) -1 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) 1 (sqrt (+ (+ (* 2 x) 2) (* F F))) (+ (+ (* 2 x) 2) (* F F)) (+ 2 (* 2 x)) (* 2 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))) (/ x B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/ -1 (sin B)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))

rewrite227.0ms (2.6%)

Memory

-9.2MiB live, 323.2MiB allocated; 49ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1607	22530
0	1657	20810
0	8769	20810

Stop Event

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

Counts

489 → 586

Calls

Call 1

Inputs
(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))
x
#s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
B
(sin.f64 B)
(/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))
(.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))
F
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/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)
#s(literal -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))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))
(/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B)
(-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))
#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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B)
(-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F)
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)))))
#s(literal 1 binary64)
(sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) (+.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 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 x B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
(/.f64 #s(literal -1 binary64) (sin.f64 B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))))))
(.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))
(/.f64 F (sin.f64 B))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))
(sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))
(+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (- 2 (* -2 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (sqrt (/ 1 (- 2 (* -2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (- 2 (* -2 x)) 3)))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #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)))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (+ (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 #s(hole binary64 F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (- 2 (* -2 x))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (pow F 2)) (* -2 x))))
#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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (+ (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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (+ (* 2 x) (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))) (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))) (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))) (+ (* 1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ 1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ 1 (pow F 2)))) (* -2 (/ x (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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)))))) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 F))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (pow F 2)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (* 2 (/ x (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* -1 (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (* (pow F 2) (sin B)))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (* (pow F 6) (sin B)))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (* (pow F 4) (sin B)))))) (/ 1 (sin B)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 -1))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4)))) 1)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (- (+ (* -1/2 (/ (- (* -2 x) 2) (pow F 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (* 1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))))) 1)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (/ -1 F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2))))) F))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow (- 2 (* -2 x)) 2) (- (* -2 x) 2))) (* -1/2 (* (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (- (* -2 x) 2)))) (pow F 6))) (+ (* -1/2 (/ (+ (* 1/4 (pow (- (* -2 x) 2) 2)) (* (- 2 (* -2 x)) (- (* -2 x) 2))) (pow F 4))) (* 1/2 (/ (- (* -2 x) 2) (pow F 2)))))) 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 -1))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) 1)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (- (+ (* 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))))) 1)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (/ (- (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* 1/3 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1 (* (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (+ (* -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 (/ (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 B #s(hole binary64 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* 1/6 (* (* (pow B 2) F) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/36 F) (* 1/120 F))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))))))) B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (/ (+ (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (* (pow B 2) (+ (* 1/6 (* F (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* (pow B 2) (+ (* -1 (* (* (pow B 2) (+ (* -1/5040 F) (+ (* 1/720 F) (* 1/6 (+ (* -1/36 F) (* 1/120 F)))))) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x)))))) (* -1 (* (+ (* -1/36 F) (* 1/120 F)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -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)))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ x B) #s(hole binary64 (/ x 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 (/ -1 (sin B)) #s(hole binary64 (/ -1 B)))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ (- (* -1/6 (pow B 2)) 1) B)))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ (- (* (pow B 2) (- (* -7/360 (pow B 2)) 1/6)) 1) B)))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ (- (* (pow B 2) (- (* (pow B 2) (- (* -31/15120 (pow B 2)) 7/360)) 1/6)) 1) B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (- (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 2)) (* -2 x))))) (/ (* 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 (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (- (+ 2 (pow F 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 (- (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) (/ (* 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) (pow F 2))))))))
#s(approx (/ -1 (sin B)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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)))))))) (/ (cos B) (sin B)))) (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx x #s(hole binary64 x))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (- (+ (* F F) 2) (* -2 x)) #s(hole binary64 (+ 2 (+ (* 2 x) (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (+ 2 (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 (* (/ 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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (pow F 2))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) #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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) 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 (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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* x (+ 2 (/ (pow F 2) x)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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))))) (+ (* 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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -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)) -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) #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 (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ (+ (* 2 x) 2) (* F F))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (+ (+ (* 2 x) 2) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#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 (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (pow F 2) x)) 2)))))

Outputs
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (.f64 (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (-.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 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)) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (-.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (-.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 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)) #s(literal -1/2 binary64)))))))
(+.f64 (.f64 (/.f64 F (sin.f64 B)) (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(+.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)) #s(literal -1/2 binary64))))
(*.f64 (neg.f64 x) #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))
(*.f64 x (neg.f64 #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(neg.f64 (*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(*.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))
x
#s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))
(/.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)
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)) #s(literal -1/2 binary64)))
(.f64 F (/.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (sin.f64 B)))
(/.f64 (neg.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))) (neg.f64 (sin.f64 B)))
(/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B))
(.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)))
F
(.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/4 binary64)) (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/4 binary64)))
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (*.f64 #s(literal 2 binary64) x))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)))
(/.f64 (-.f64 (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 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (*.f64 F F)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (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)) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)))))
(-.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (neg.f64 F) F))
(-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))
(+.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))
(+.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F))
(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 F F) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)))
(+.f64 (.f64 #s(literal 2 binary64) x) (+.f64 (.f64 F F) #s(literal 2 binary64)))
(+.f64 #s(literal 2 binary64) (-.f64 (.f64 F F) (.f64 #s(literal -2 binary64) x)))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))
(/.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 F #s(literal 4 binary64)) #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)))))
(/.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 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)
#s(literal -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))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))
(/.f64 (neg.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) (neg.f64 B))
(/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B)
(-.f64 (/.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B))
(/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 x #s(literal 3 binary64))) (+.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (+.f64 (.f64 x x) (.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x))))
(-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))
#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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x) B))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x)) (neg.f64 B))
(/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x) B)
(-.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))))) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)))))) (.f64 x x)) (+.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))))) #s(literal 3 binary64)) (pow.f64 x #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))))) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 x x) (.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x))))
(-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x)
(.f64 (pow.f64 (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))) #s(literal -1 binary64)) F)
(/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
(pow.f64 (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(literal 1 binary64)
(pow.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))
(/.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 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 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
(/.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 (+.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 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) x) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (-.f64 #s(literal 4 binary64) (.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))))
(-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))
(+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))
(*.f64 #s(literal 2 binary64) x)
(+.f64 x x)
(/.f64 (-.f64 (.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (.f64 #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 #s(literal -1 binary64) (sin.f64 B))))) (-.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (-.f64 (.f64 #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 #s(literal -1 binary64) (sin.f64 B)))) (.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))))))
(+.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 (neg.f64 x) (neg.f64 B))
(/.f64 x B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
(/.f64 #s(literal -1 binary64) (sin.f64 B))
(/.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 (-.f64 (.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (.f64 #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (-.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (-.f64 (.f64 #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))))))
(+.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))) (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
(.f64 (/.f64 F (sin.f64 B)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))
(/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))
(/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))
(/.f64 (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (sin.f64 B))
(/.f64 (neg.f64 F) (neg.f64 (sin.f64 B)))
(/.f64 F (sin.f64 B))
(pow.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))
(sqrt.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (*.f64 #s(literal 2 binary64) x))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)))
(/.f64 (-.f64 (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 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (*.f64 F F)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (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)) (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)))))
(-.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (neg.f64 F) F))
(-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))
(+.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))
(+.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F))
(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 F F) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)))
(+.f64 (.f64 #s(literal 2 binary64) x) (+.f64 (.f64 F F) #s(literal 2 binary64)))
(+.f64 #s(literal 2 binary64) (-.f64 (.f64 F F) (.f64 #s(literal -2 binary64) x)))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) x) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (-.f64 (pow.f64 F #s(literal 4 binary64)) (.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))
(-.f64 (.f64 #s(literal 2 binary64) x) (.f64 (neg.f64 F) F))
(+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 #s(literal 2 binary64) x) (.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 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 (+.f64 (.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 #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 (.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 (+.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 (.f64 #s(literal -1/2 binary64) (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)))))) (/.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 (+.f64 (.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 #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))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.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 (.f64 #s(literal -1/2 binary64) (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 (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (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)))) (.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 (.f64 #s(literal -1/2 binary64) (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 (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (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 -1 binary64))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (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) (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 -1 binary64))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 #s(literal -5/16 binary64) (.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 -1/2 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 -1 binary64))))))
#s(approx F F)
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -1/2) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (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 -1 binary64)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (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) (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 -1 binary64)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 #s(literal -5/16 binary64) (.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 -1/2 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 -1 binary64)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
#s(approx (+ (* F F) 2) #s(literal 2 binary64))
#s(approx (+ (* F F) 2) (+.f64 (*.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))))) (neg.f64 (/.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 (+.f64 (.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 #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 (.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 (+.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 (.f64 #s(literal -1/2 binary64) (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)))))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (neg.f64 x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 F (+.f64 (.f64 (pow.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 #s(literal -1/2 binary64) (/.f64 (.f64 F F) B)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal -3 binary64)))))) (/.f64 (neg.f64 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (.f64 F F) B)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.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 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 (neg.f64 x) B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 F (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 F (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (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 -1 binary64))))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (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) (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 -1 binary64))))) x))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (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 -1 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (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) (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 -1 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 #s(literal -5/16 binary64) (.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 -1/2 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 -1 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (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 -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (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) (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 -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 #s(literal -5/16 binary64) (.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 -1/2 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 -1 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -5 binary64)))) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -3 binary64)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) 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 #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 (+.f64 (.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 #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))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.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 (.f64 #s(literal -1/2 binary64) (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 (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (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)))) (.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 (.f64 #s(literal -1/2 binary64) (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 (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 F (+.f64 (.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 #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))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.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 (.f64 #s(literal -1/2 binary64) (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 (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 F (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (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)))) (.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 (.f64 #s(literal -1/2 binary64) (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 (/ F (sin B)) (/.f64 F (sin.f64 B)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (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 -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (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) (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 -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.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)))) (.f64 (.f64 #s(literal -5/16 binary64) (.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 -1/2 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 -1 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -3 binary64)))))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 F F) (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -5 binary64)))) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -3 binary64)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))))) (sqrt.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
#s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (* 2 x) (* F F)) (+.f64 (.f64 F F) (.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 #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 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.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 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (sin.f64 B))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.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 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (sin.f64 B))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (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)))) (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 (.f64 #s(literal 1/2 binary64) (-.f64 (.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 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (sin.f64 B))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.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 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (sin.f64 B))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) #s(literal 1 binary64)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (pow.f64 F #s(literal -1 binary64)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) #s(literal 1 binary64)) F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)))) F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 F F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (.f64 F F) (-.f64 (+.f64 (.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (/.f64 x (*.f64 F F))))))
#s(approx (+ (* F F) 2) (*.f64 F F))
#s(approx (+ (* F F) 2) (.f64 (.f64 F F) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 F #s(literal -2 binary64))) #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 (/.f64 (.f64 #s(literal -1/2 binary64) (-.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 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (.f64 F F) (sin.f64 B)))) (/.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 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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))) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (.f64 B (pow.f64 F #s(literal 4 binary64)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (.f64 B (pow.f64 F #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 3 binary64))) (.f64 B (pow.f64 F #s(literal 6 binary64))))) (pow.f64 B #s(literal -1 binary64)))) (/.f64 x B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 #s(literal 1 binary64) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)) x))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (pow.f64 F #s(literal -1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F))) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (+.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)) F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) F)
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 F (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 F (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 F (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/16 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 F F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.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)))) (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 (.f64 #s(literal -1/2 binary64) (-.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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (.f64 F F) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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))) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (.f64 F F) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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))) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (pow.f64 F #s(literal -1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F))) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (+.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)) F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) F)
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 F (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 F (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 F (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/16 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 F F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #s(literal 1 binary64))))
#s(approx (+ (* 2 x) (* F F)) (*.f64 F F))
#s(approx (+ (* 2 x) (* F F)) (.f64 (.f64 F F) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 x (.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 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 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.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 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (sin.f64 B)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (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 (.f64 #s(literal -1/2 binary64) (-.f64 (.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 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (pow.f64 F #s(literal 6 binary64)) (sin.f64 B))) (/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))) (sin.f64 B)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.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 (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal -1 binary64))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 F F)) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (neg.f64 (/.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) #s(literal 1 binary64)) F)))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)))) (pow.f64 F #s(literal 6 binary64))))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) x) #s(literal 2 binary64))) (*.f64 F 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 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 #s(literal 1/2 binary64) (-.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 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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 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 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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))) (sin.f64 B)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) B) (.f64 F F)) (/.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) B) (pow.f64 F #s(literal 4 binary64))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) B) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 3 binary64))) (.f64 B (pow.f64 F #s(literal 6 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F)))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) (+.f64 #s(literal 1 binary64) x)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)) #s(literal 1 binary64)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 #s(literal -1 binary64) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (+.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)) F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/16 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))))))
#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) (-.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 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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))) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (.f64 (pow.f64 F #s(literal 4 binary64)) (sin.f64 B))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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))) (sin.f64 B)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 #s(literal -1 binary64) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (+.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 (pow.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))))) #s(literal 1 binary64)) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal 2 binary64)) #s(literal -3/4 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 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F))) #s(literal 1 binary64)) F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 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 #s(literal 1/16 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 #s(literal -1/2 binary64) (-.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 (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #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 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #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 (+.f64 (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (.f64 B B) (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #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 (+.f64 (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (.f64 B B) (+.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (.f64 B B) (+.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64)))) (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))))) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))))))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.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) (+.f64 (.f64 (.f64 B B) (.f64 x #s(literal 1/45 binary64))) (.f64 #s(literal 1/3 binary64) x))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (.f64 B B) (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64))))))) (*.f64 #s(literal 1/3 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 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (.f64 x #s(literal 1/45 binary64)))) (.f64 #s(literal 1/3 binary64) x))) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64)))))) (.f64 x #s(literal 1/45 binary64)))) (*.f64 #s(literal 1/3 binary64) x))) x) B))
#s(approx (/ 1 (tan B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 (.f64 #s(literal -1/3 binary64) (.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (+.f64 (.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))) #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 (.f64 #s(literal -1/3 binary64) (.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -1/45 binary64) (.f64 B B)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 (.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))) #s(literal 1 binary64)) B))
#s(approx (cos B) #s(literal 1 binary64))
#s(approx (cos B) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 B B)) #s(literal 1 binary64)))
#s(approx (cos B) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 B B)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
#s(approx (cos B) (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 B B)) #s(literal 1/24 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
#s(approx B B)
#s(approx (sin B) B)
#s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64))))
#s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (*.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #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 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 (neg.f64 (.f64 (.f64 B B) (.f64 F #s(literal -7/360 binary64)))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 B B) (+.f64 (.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #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 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #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 (+.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (.f64 B B) (+.f64 (neg.f64 (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (.f64 F #s(literal -7/360 binary64)))) (.f64 x #s(literal 1/45 binary64)))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #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 (+.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (.f64 B B) (+.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (.f64 B B) (+.f64 (neg.f64 (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64))))))) (neg.f64 (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (.f64 F #s(literal -7/360 binary64)))))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) x) B))
#s(approx (/ x B) (/.f64 x B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #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 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 (neg.f64 (.f64 (.f64 B B) (.f64 F #s(literal -7/360 binary64)))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 (.f64 B B) (+.f64 (neg.f64 (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (.f64 F #s(literal -7/360 binary64)))) (.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (/ -1 (sin B)) (/.f64 #s(literal -1 binary64) B))
#s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))
#s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (/.f64 F B) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 (neg.f64 (.f64 (.f64 B B) (.f64 F #s(literal -7/360 binary64)))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (+.f64 (.f64 (.f64 B B) (+.f64 (.f64 (.f64 B B) (+.f64 (neg.f64 (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (.f64 F #s(literal -7/360 binary64)))) (.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 F (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) B))
#s(approx (/ F (sin B)) (/.f64 F B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 B B) F)) F) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) 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 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))) (/.f64 (.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (neg (* x (/ 1 (tan B)))) (neg.f64 (/.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 (/ (cos B) (sin B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (cos B) (cos.f64 B))
#s(approx (sin B) (sin.f64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))) (/.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 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (/ -1 (sin B)) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 (.f64 F F) #s(literal 2 binary64)) #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 x (-.f64 (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #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 x (-.f64 (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #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 x (-.f64 (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#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 (.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 (neg.f64 (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.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 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.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 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (neg.f64 (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (.f64 (neg.f64 x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 F F) #s(literal 2 binary64)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
#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 (.f64 F F) #s(literal 2 binary64)) #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 x (-.f64 (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #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 x (-.f64 (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #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 x (-.f64 (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (/.f64 (cos.f64 B) (sin.f64 B)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 x (-.f64 (neg.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (/.f64 x B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F (/.f64 x B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (neg.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (pow.f64 B #s(literal -1 binary64)))) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 x (-.f64 (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) #s(literal 1 binary64))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1 binary64))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 x (-.f64 (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1 binary64))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (neg.f64 (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (neg.f64 x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 x (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 F 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 (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.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 (neg.f64 (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.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 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.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 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (neg.f64 (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -5/2 binary64) (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))))) (neg.f64 (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (neg.f64 x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 #s(literal 3/2 binary64) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64)))))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 x (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 x (+.f64 (.f64 x (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 F 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 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 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 (.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 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 (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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.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)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 F (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.f64 F F) #s(literal 2 binary64))) (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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.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(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -1/2) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.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)) -1/2) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 x (+.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) 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 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 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 (.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 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 x (-.f64 (.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 x (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 (.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 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 x (-.f64 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (pow.f64 (+.f64 (.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 -7 binary64))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 x (-.f64 (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 x (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 x (-.f64 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.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 -7 binary64))))) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))))) #s(literal 1 binary64))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (+.f64 (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.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)))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 F (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.f64 F F) #s(literal 2 binary64))) (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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.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(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (*.f64 x #s(literal 2 binary64))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 x (+.f64 (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 x (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 x (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (+.f64 (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 x (+.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) x) #s(literal 2 binary64))))
#s(approx (+ 2 (* 2 x)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))
#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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 F (+.f64 (.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 -3 binary64)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 F (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 B) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (*.f64 x #s(literal 2 binary64))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 x (+.f64 (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 x (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 x (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (+.f64 (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 x (+.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) x) #s(literal 2 binary64))))
#s(approx (+ (* 2 x) (* F F)) (.f64 x (+.f64 (/.f64 (.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 (neg.f64 x) (+.f64 (neg.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 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) 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 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.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 (.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))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) 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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.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 (.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))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 x)) (.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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))))) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -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)) -1/2) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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)) -1/2) (+.f64 (+.f64 (.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 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))
#s(approx (pow (- (+ (* F F) 2) (* -2 x)) -1/2) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 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 (+.f64 (.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)))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (+ (* 2 x) (* F F))) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) 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 (neg.f64 x) (+.f64 (neg.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 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) 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 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.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 (.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))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (.f64 (/.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x)) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) B) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x)) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x)) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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))))) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))) x)) #s(literal 1 binary64))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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))))) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 x))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (*.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (+.f64 (.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 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 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 (+.f64 (.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)))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 5/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64)))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) x)) #s(literal 2 binary64))))
#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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.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 (.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))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 x)) (.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.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 (.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))))) (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 x)) (.f64 (sin.f64 B) (sqrt.f64 #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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)))) (+.f64 (.f64 (/.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (+.f64 (.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 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 x))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/64 binary64) (/.f64 (.f64 x (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/16 binary64) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 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 (+.f64 (.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)))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 5/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64)))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) x)) #s(literal 2 binary64))))
#s(approx (+ (* 2 x) (* F F)) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (.f64 F F) x)) #s(literal 2 binary64))))

eval73.0ms (0.9%)

Memory: 29.6MiB live, 169.7MiB allocated; 16ms collecting garbage
Compiler: Compiled 33 321 to 2 884 computations (91.3% saved)

prune92.0ms (1.1%)

Memory

-11.8MiB live, 174.7MiB allocated; 28ms collecting garbage

Pruning

64 alts after pruning (62 fresh and 2 done)

	Pruned	Kept	Total
New	501	32	533
Fresh	14	30	44
Picked	4	1	5
Done	0	1	1
Total	519	64	583

Accuracy

99.9%

Counts

583 → 64

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	72.9%	(+.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))))))
	49.4%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
	72.8%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
	58.9%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
	67.8%	(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) #s(approx (sin B) B)))
	23.1%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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))))
	35.2%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
	33.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
	42.8%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
	47.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
	56.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64)))))))
	34.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)))))))
	17.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
	47.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
▶	34.3%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
▶	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
	33.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
	34.0%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
	34.0%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
	34.0%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
	34.2%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64)) B))))
	56.7%	(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
	42.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
	49.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
	29.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
	34.1%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x) B))
	42.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
	43.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
	19.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
	30.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
	30.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #s(literal 1 binary64)))))) F) x) B))
	26.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
▶	17.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x) B))
	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
	26.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
	25.2%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)) #s(literal 1 binary64))) x) B))
	23.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
	19.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
	26.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))
✓	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))
	26.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))) #s(literal 1 binary64)))) B))
	18.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))) B))
▶	27.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
	29.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (/.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
✓	59.5%	#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))))
	34.7%	#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)) #s(approx (sin B) B))))
	34.6%	#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 #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))))) x)) (sin.f64 B))))
	34.6%	#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B B) x))))))) (sin.f64 B))))
	44.9%	#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) #s(approx (* (cos B) x) x)) (sin.f64 B))))
	51.8%	#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))))
	59.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 #s(approx (+ 1 (* (cos B) x)) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64))))) (sin.f64 B))))
	24.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
	23.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))))
	27.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
	34.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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)))
	25.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

Compiler

Compiled 6 830 to 4 396 computations (35.6% saved)

series52.0ms (0.6%)

Memory

0.2MiB live, 94.5MiB allocated; 6ms collecting garbage

Counts

57 → 383

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))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
(/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))
(neg.f64 x)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x) B))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x) B)
(-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x)
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F)
(/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))
(neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64))))
(sqrt.f64 (*.f64 x #s(literal 2 binary64)))
(*.f64 x #s(literal 2 binary64))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 x B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))
(.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))
(/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)))))
#s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64))))
(.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 B B))
#s(literal -1/6 binary64)
(*.f64 B B)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))
(sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))
(+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))))))
(.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))))
(sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))
(+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))

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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))))))) x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #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))))))))) x)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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)))))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (+ (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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (+ (* 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 (- (/ 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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)))))) x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #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)))))) x)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 1))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (pow F 2)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (* 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 (* -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 -1))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) 1)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (- (+ (* 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)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (- (+ (* 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))))) 1)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) 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 (/ x B) #s(hole binary64 (/ x B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 B))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow B 2)))))
#s(approx (* -1/6 (* B B)) #s(hole binary64 (* -1/6 (pow B 2))))
#s(approx (* B B) #s(hole binary64 (pow B 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 (+ (* 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 (* 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 (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* -1/6 (pow B 3))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* (pow B 3) (- (/ 1 (pow B 2)) 1/6))))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 (* -1/6 (pow B 2))))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 (* (pow B 2) (- (/ 1 (pow B 2)) 1/6))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* -1 (* (pow B 3) (- 1/6 (/ 1 (pow B 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (neg (sqrt (* x 2))) #s(hole binary64 (* -1 (* (sqrt x) (sqrt 2)))))
#s(approx (sqrt (* x 2)) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (* x 2) #s(hole binary64 (* 2 x)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #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 (* 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* x (+ 2 (/ (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)))))
#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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (neg (sqrt (* x 2))) #s(hole binary64 (* (sqrt x) (* (sqrt -2) (sqrt -1)))))
#s(approx (sqrt (* x 2)) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (pow F 2) x)) 2)))))

Calls

9 calls:

Time	Variable		Point	Expression
7.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))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg (sqrt (* x 2))) (sqrt (* x 2)) (* x 2) (+ (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 B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (sin B) (* B (+ (* -1/6 (* B B)) 1)) (+ (* -1/6 (* B B)) 1) (* -1/6 (* B B)) -1/6 (* B B) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
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) 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))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg (sqrt (* x 2))) (sqrt (* x 2)) (* x 2) (+ (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 B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (sin B) (* B (+ (* -1/6 (* B B)) 1)) (+ (* -1/6 (* B B)) 1) (* -1/6 (* B B)) -1/6 (* B B) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
5.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))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg (sqrt (* x 2))) (sqrt (* x 2)) (* x 2) (+ (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 B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (sin B) (* B (+ (* -1/6 (* B B)) 1)) (+ (* -1/6 (* B B)) 1) (* -1/6 (* B B)) -1/6 (* B B) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
4.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))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg (sqrt (* x 2))) (sqrt (* x 2)) (* x 2) (+ (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 B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (sin B) (* B (+ (* -1/6 (* B B)) 1)) (+ (* -1/6 (* B B)) 1) (* -1/6 (* B B)) -1/6 (* B B) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))
4.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 (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))))) (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg x) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg (sqrt (* x 2))) (sqrt (* x 2)) (* x 2) (+ (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 B) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ F (sin B)) (sin B) (* B (+ (* -1/6 (* B B)) 1)) (+ (* -1/6 (* B B)) 1) (* -1/6 (* B B)) -1/6 (* B B) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)) (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+ 2 (+ (* 2 x) (* F F))) (+ (* 2 x) (* F F)))

rewrite268.0ms (3.1%)

Memory

-10.8MiB live, 319.2MiB allocated; 53ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1363	19724
0	1427	17731
1	7434	17731
0	8860	17731

Stop Event

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

Counts

440 → 578

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))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
(/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))
(neg.f64 x)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x) B))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x) B)
(-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x)
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F)
(/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))
(neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64))))
(sqrt.f64 (*.f64 x #s(literal 2 binary64)))
(*.f64 x #s(literal 2 binary64))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 x B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))))
(.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))
(/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)))))
#s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64))))
(.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 B B))
#s(literal -1/6 binary64)
(*.f64 B B)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))
(sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))
(+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))))))
(.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))))
(sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))
(+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (* 2 x) (* F F)) (*.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))))) #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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))))))) x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* (/ F B) (sqrt (/ 1 (+ 2 (* 2 x))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* -1/2 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ x B)) (* F (+ (* (/ 1 B) (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/2 (* (/ 1 B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 3/8 (* (/ (pow F 2) B) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (* F (sqrt (/ 1 (+ 2 (* 2 x))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #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))))))))) x)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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)))))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (+ (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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (* 2 x))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (* 2 x)))) (* -1/2 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (* 2 x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* 1/2 (* (pow F 2) (sqrt (/ 1 (+ 2 (* 2 x)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* -1/8 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3))))) (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (* 2 x))) (* (pow F 2) (+ (* 1/2 (sqrt (/ 1 (+ 2 (* 2 x))))) (* (pow F 2) (+ (* -1/8 (sqrt (/ 1 (pow (+ 2 (* 2 x)) 3)))) (* 1/16 (* (pow F 2) (sqrt (/ 1 (pow (+ 2 (* 2 x)) 5))))))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (* 2 x)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (* 2 x))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (+ 2 (+ (* 2 x) (pow F 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* 2 x)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (+ (* 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 (- (/ 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #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)))))) x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (/ 1 B)) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4)))) (/ 1 B))) (/ x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (- (+ (* -1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* -1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))) (/ 1 B)))) (/ x B))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- 1 x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #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))))) x)))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #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)))))) x)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 1))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ 1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (+ (* -1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (pow F 2)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* (pow F 2) (+ 1 (+ (* 2 (/ x (pow F 2))) (* 2 (/ 1 (pow F 2))))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* (pow F 2) (+ 1 (* 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 (* -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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (/ (+ 1 x) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (pow F 4))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* -1 (/ (+ 1 x) B)) (+ (* 1/2 (/ (+ 2 (* 2 x)) (* B (pow F 2)))) (+ (* 1/2 (/ (+ (* -1 (pow (+ 2 (* 2 x)) 2)) (* 1/4 (pow (+ 2 (* 2 x)) 2))) (* B (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)) (* B (pow F 6)))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) (+ 1 x))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (+ (* 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 x))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (- (+ (* 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))))) (+ 1 x))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 -1))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))) 1)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (- (+ (* 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)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (- (+ (* 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))))) 1)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (/ -1 F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* -1 (/ (+ 1 (* -1/2 (/ (+ 2 (* 2 x)) (pow F 2)))) F))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* F (+ 1 (+ (* -1/8 (/ (pow (+ 2 (* 2 x)) 2) (pow F 4))) (+ (* 1/16 (/ (pow (+ 2 (* 2 x)) 3) (pow F 6))) (* 1/2 (/ (+ 2 (* 2 x)) (pow F 2))))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (- (* 1/2 (/ (+ 2 (* 2 x)) (* (pow F 2) (sin B)))) (/ 1 (sin B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ (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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (/ (- (* F (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2)))))) 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 (/ x B) #s(hole binary64 (/ x B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 B))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow B 2)))))
#s(approx (* -1/6 (* B B)) #s(hole binary64 (* -1/6 (pow B 2))))
#s(approx (* B B) #s(hole binary64 (pow B 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 (+ (* 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 (* 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 (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (+ (* 2 x) (pow F 2))))))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* -1/6 (pow B 3))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* (pow B 3) (- (/ 1 (pow B 2)) 1/6))))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 (* -1/6 (pow B 2))))
#s(approx (+ (* -1/6 (* B B)) 1) #s(hole binary64 (* (pow B 2) (- (/ 1 (pow B 2)) 1/6))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) #s(hole binary64 (* -1 (* (pow B 3) (- 1/6 (/ 1 (pow B 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* x (- (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (+ (* x (- (+ (* -1 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (/ (* F x) B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* (/ F B) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) (/ 1 B))) (* (/ F B) (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))) 1)))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (- (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5)))))))) 1)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* F (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* F (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* 3/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* F (sqrt (/ 1 (+ 2 (pow F 2))))) (* x (+ (* -1 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))) (* x (+ (* -5/2 (* (* F x) (sqrt (/ 1 (pow (+ 2 (pow F 2)) 7))))) (* 3/2 (* F (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (sqrt (/ 1 (+ 2 (pow F 2))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (sqrt (+ 2 (pow F 2)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (sqrt (/ 1 (+ 2 (pow F 2))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* -1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3))))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (+ (sqrt (+ 2 (pow F 2))) (* x (+ (sqrt (/ 1 (+ 2 (pow F 2)))) (* x (+ (* -1/2 (sqrt (/ 1 (pow (+ 2 (pow F 2)) 3)))) (* 1/2 (* x (sqrt (/ 1 (pow (+ 2 (pow F 2)) 5))))))))))))
#s(approx (neg (sqrt (* x 2))) #s(hole binary64 (* -1 (* (sqrt x) (sqrt 2)))))
#s(approx (sqrt (* x 2)) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (* x 2) #s(hole binary64 (* 2 x)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ F (sin B)) (sqrt (/ 1 (+ 2 (pow F 2)))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #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 (* 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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* x (- (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (* B (sqrt 1/2))) (sqrt (/ 1 (pow x 7))))) (* (/ (* F (sqrt 1/2)) B) (sqrt (/ 1 (pow x 3)))))) (/ 1 B)))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* x (- (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) 1))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* x (- (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 (pow x 3)))))) 1))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #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)))) (sqrt 1/2)) (sqrt (/ 1 (pow x 7))))) (+ (* -1/8 (* (/ (* F (+ 2 (pow F 2))) (sqrt 1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (pow (+ 2 (pow F 2)) 2)) (sqrt 1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (sqrt 1/2)) (sqrt (/ 1 x))))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (sqrt 1/2))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* (sqrt x) (sqrt 2))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (pow (+ 2 (pow F 2)) 2) (pow (sqrt 2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (pow (+ 2 (pow F 2)) 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (+ 2 (pow F 2)) (sqrt 2)))) (* (sqrt (/ 1 x)) (sqrt 2))))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (sqrt 1/2)) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* 2 x)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* x (+ 2 (+ (* 2 (/ 1 x)) (/ (pow F 2) x))))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* x (+ 2 (/ (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)))))
#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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 (pow x 3))))) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x)))) x)) (/ 1 B))))))
#s(approx (/ (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) B) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (* B (sqrt -1/2))) (sqrt (/ 1 (pow x 5))))) (* (/ (* F (* (sqrt -1) (sqrt -1/2))) B) (sqrt (/ 1 x))))) x)) (/ 1 B))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (pow x 3))))))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))) x)))))))
#s(approx (- (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) x) #s(hole binary64 (* -1 (* x (+ 1 (* -1 (/ (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))) x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (+ (* 1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (sqrt -1/2)) (sqrt (/ 1 (pow x 5))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* F (* (sqrt -1) (pow (+ 2 (pow F 2)) 2))) (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))))) (sqrt -1/2)) (sqrt (/ 1 x))))) (pow x 3))) (+ (* -1/8 (* (/ (* F (* (sqrt -1) (+ 2 (pow F 2)))) (sqrt -1/2)) (sqrt (/ 1 (pow x 3))))) (* (* F (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 x)))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #s(hole binary64 (* (sqrt (/ 1 x)) (* (sqrt -1) (sqrt -1/2)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) #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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1)))))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) #s(hole binary64 (* -1 (* x (+ (* -1/8 (* (sqrt (/ 1 (pow x 5))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 2)) (pow (sqrt -2) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (pow x 7))) (/ (* (sqrt -1) (pow (+ 2 (pow F 2)) 3)) (pow (sqrt -2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (pow x 3))) (/ (* (sqrt -1) (+ 2 (pow F 2))) (sqrt -2)))) (* (sqrt (/ 1 x)) (* (sqrt -2) (sqrt -1))))))))))
#s(approx (neg (sqrt (* x 2))) #s(hole binary64 (* (sqrt x) (* (sqrt -2) (sqrt -1)))))
#s(approx (sqrt (* x 2)) #s(hole binary64 (* -1 (* (sqrt x) (* (sqrt -2) (sqrt -1))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #s(hole binary64 (* (/ (* F (* (sqrt -1) (sqrt -1/2))) (sin B)) (sqrt (/ 1 x)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) #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 (+ 2 (+ (* 2 x) (* F F))) #s(hole binary64 (* -1 (* x (- (* -1 (/ (+ 2 (pow F 2)) x)) 2)))))
#s(approx (+ (* 2 x) (* F F)) #s(hole binary64 (* -1 (* x (- (* -1 (/ (pow F 2) x)) 2)))))

Outputs
(/.f64 (-.f64 (.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (/.f64 (neg.f64 x) (tan.f64 B))) (.f64 (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))) (-.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(literal 3 binary64)) (pow.f64 (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (/.f64 (neg.f64 x) (tan.f64 B))) (-.f64 (.f64 (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))) (.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B)))))))
(-.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (.f64 (neg.f64 (/.f64 F (sin.f64 B))) (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))))
(+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))))
(+.f64 (.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (sin.f64 B))) (/.f64 (neg.f64 x) (tan.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))))
(/.f64 (neg.f64 x) (tan.f64 B))
(/.f64 x (neg.f64 (tan.f64 B)))
(neg.f64 (/.f64 x (tan.f64 B)))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (neg.f64 x) (neg.f64 (tan.f64 B)))
(/.f64 x (tan.f64 B))
x
x
#s(literal 1 binary64)
(/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 (+.f64 B (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
(.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64)) (/.f64 F (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)) #s(literal -1/2 binary64)))
(/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/4 binary64)) (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/4 binary64)))
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 F #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (*.f64 #s(literal 2 binary64) x))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 F #s(literal 4 binary64)) (.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))))))
(-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))
(-.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (neg.f64 F) F))
(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 F F) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
(+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))
(+.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))
(+.f64 (.f64 #s(literal 2 binary64) x) (+.f64 (.f64 F F) #s(literal 2 binary64)))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))
(/.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)))))
(+.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)))
(+.f64 (cosh.f64 (.f64 (log.f64 F) #s(literal 2 binary64))) (sinh.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))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
(/.f64 (neg.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))) (neg.f64 B))
(/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))
(*.f64 #s(literal -1 binary64) x)
(*.f64 x #s(literal -1 binary64))
(neg.f64 x)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) x) B))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) x)) (neg.f64 B))
(/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) x) B)
(-.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) B) (/.f64 x B))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) x))))) (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) x)))))) (.f64 x x)) (+.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) x))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) x))))) #s(literal 3 binary64)) (pow.f64 x #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) x))))) (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) x)))))) (+.f64 (.f64 x x) (.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) x))))
(-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) x)
(.f64 (pow.f64 #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))) #s(literal -1 binary64)) F)
(.f64 F (pow.f64 #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))) #s(literal -1 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) F) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))))
(pow.f64 #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))))
(/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))))
(exp.f64 (.f64 (log.f64 #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))) #s(literal -1 binary64)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))
(.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 x)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64))
(.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) x)))
(neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))
(.f64 (.f64 (sqrt.f64 x) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 x))
(*.f64 (sqrt.f64 x) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal 2 binary64) x))
(exp.f64 (.f64 (log.f64 (.f64 #s(literal 2 binary64) x)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) x)
(*.f64 x #s(literal 2 binary64))
(+.f64 x x)
(/.f64 (-.f64 (.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (.f64 #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))) (-.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (-.f64 (.f64 #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))))))
(+.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))))
(neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
(/.f64 (neg.f64 x) (neg.f64 B))
(/.f64 x B)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))))
(.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))
(/.f64 (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))
(/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
(/.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))) #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)))
(/.f64 (neg.f64 F) (neg.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))))
(/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)))
#s(approx (sin B) (.f64 (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))
(.f64 (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)
(.f64 B (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) B) (.f64 #s(literal 1 binary64) B))
(+.f64 (.f64 #s(literal 1 binary64) B) (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) B))
(+.f64 (.f64 B (.f64 (.f64 B B) #s(literal -1/6 binary64))) (.f64 B #s(literal 1 binary64)))
(+.f64 (.f64 B #s(literal 1 binary64)) (.f64 B (.f64 (.f64 B B) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) (.f64 (.f64 B B) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) (.f64 (.f64 B B) #s(literal -1/6 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 B B) #s(literal -1/6 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) (.f64 (.f64 B B) #s(literal -1/6 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) (.f64 (.f64 B B) #s(literal -1/6 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 B B) #s(literal -1/6 binary64))))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 B B)))
(+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 B B) #s(literal -1/6 binary64)))
(.f64 (.f64 #s(literal -1/6 binary64) B) B)
(.f64 (.f64 B B) #s(literal -1/6 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 B B))
#s(literal -1/6 binary64)
(*.f64 (pow.f64 B #s(literal 1 binary64)) (pow.f64 B #s(literal 1 binary64)))
(*.f64 (fabs.f64 B) (fabs.f64 B))
(*.f64 (neg.f64 B) (neg.f64 B))
(*.f64 B B)
(pow.f64 B #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 B) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 B) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 B) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))
(sqrt.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))) #s(literal -1 binary64)))
(pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
(exp.f64 (.f64 (log.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x)))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 F #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (*.f64 #s(literal 2 binary64) x))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) x)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 F #s(literal 4 binary64)) (.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))))))
(-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))
(-.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (neg.f64 F) F))
(+.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 F F) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
(+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))
(+.f64 (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))
(+.f64 (.f64 #s(literal 2 binary64) x) (+.f64 (.f64 F F) #s(literal 2 binary64)))
(+.f64 #s(literal 2 binary64) (+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (pow.f64 F #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) x) #s(literal 3 binary64)) (pow.f64 (.f64 F F) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 2 binary64) x) (.f64 #s(literal 2 binary64) x)) (-.f64 (pow.f64 F #s(literal 4 binary64)) (.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F)))))
(-.f64 (.f64 #s(literal 2 binary64) x) (.f64 (neg.f64 F) F))
(+.f64 (.f64 F F) (.f64 #s(literal 2 binary64) x))
(+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))
(/.f64 (-.f64 (.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (.f64 #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))) (-.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B)))) (-.f64 (.f64 #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))) (.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))))
(+.f64 #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))) (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))
(.f64 (pow.f64 (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 F (sin.f64 B)))
(.f64 (/.f64 F (sin.f64 B)) (pow.f64 (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(/.f64 (.f64 F (pow.f64 (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))) #s(literal -1 binary64))) (sin.f64 B))
(/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))
(/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))
(pow.f64 (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))) #s(literal -1 binary64)))
(pow.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)))) (-.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 #s(approx (+ (* 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 #s(approx (+ (* 2 x) (* F F)) (.f64 #s(literal 2 binary64) x)) #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) x))) (.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))
(+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)))
#s(approx (+ (* 2 x) (* F F)) (*.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))))) (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 (+.f64 (.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 (+.f64 (.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.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 (+.f64 (*.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))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.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))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.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))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/8 binary64)) (.f64 (.f64 #s(literal -5/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -7 binary64))))) (.f64 F F)) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
#s(approx (+ (* F F) 2) #s(literal 2 binary64))
#s(approx (+ (* F F) 2) (+.f64 (*.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))))) (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 (+.f64 (.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 (+.f64 (.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (neg.f64 x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (+.f64 (.f64 (pow.f64 B #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 F F) B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64))))) F) (/.f64 (neg.f64 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (.f64 F F) B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 B #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 F F)) (.f64 (pow.f64 B #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (neg.f64 x) B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))) F) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (neg.f64 x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (+.f64 (.f64 (pow.f64 B #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 F F) B)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64))))) F) (/.f64 (neg.f64 x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (.f64 F F) B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 B #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 F F)) (.f64 (pow.f64 B #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))))) F) (/.f64 (neg.f64 x) B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))) F) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F) x))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))) F))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/8 binary64)) (.f64 (.f64 #s(literal -5/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -7 binary64))))) (.f64 F F)) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/8 binary64)) (.f64 (.f64 #s(literal -5/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -7 binary64))))) (.f64 F F)) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 F F)) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (.f64 F F)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 F F)) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))) #s(literal 1/2 binary64))) (.f64 F F)) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))))) F))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/8 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal -1 binary64))))) F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))
#s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ (* 2 x) (* F F)) (+.f64 (.f64 F F) (.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 #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) (+.f64 (.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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F 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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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 (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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 (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (*.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 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)) F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 F F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (+.f64 (/.f64 (+.f64 (.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 (+.f64 (.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))))) (/.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) (+.f64 (.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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F 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 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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 (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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 (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)) (/.f64 (-.f64 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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)) B)) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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)) B))) (+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (.f64 (pow.f64 F #s(literal 6 binary64)) B)) #s(literal -1/2 binary64)) (pow.f64 B #s(literal -1 binary64)))) (/.f64 x B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 #s(literal 1 binary64) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)) (/.f64 (-.f64 #s(literal 1 binary64) x) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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)) B)) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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)) B))) (+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (.f64 (pow.f64 F #s(literal 6 binary64)) B)) #s(literal -1/2 binary64)) (pow.f64 B #s(literal -1 binary64)))) (/.f64 x B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 #s(literal 1 binary64) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)) x))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(literal 1 binary64))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (pow.f64 F #s(literal -1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)) F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) F)
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 F #s(literal 4 binary64)))) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F)))) F))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (.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 (/.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (*.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 (+ 2 (+ (* 2 x) (* F F))) (*.f64 F F))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) #s(literal 1 binary64)) (.f64 F F)))
#s(approx (+ (* 2 x) (* F F)) (*.f64 F F))
#s(approx (+ (* 2 x) (* F F)) (.f64 (+.f64 (.f64 (/.f64 x (.f64 F F)) #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) (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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))) (/.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) (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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))) (/.f64 #s(literal -1 binary64) F))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) F)))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)) 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) (+.f64 (.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 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) B) (.f64 F F)) (/.f64 (/.f64 (.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) B) (pow.f64 F #s(literal 4 binary64))))) (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) B) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (.f64 (pow.f64 F #s(literal 6 binary64)) B)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B))) (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 #s(literal -1 binary64) (neg.f64 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) (+.f64 #s(literal 1 binary64) x)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) B) (.f64 F F)) (/.f64 (/.f64 (.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) B) (pow.f64 F #s(literal 4 binary64))))) (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64)) B) (pow.f64 F #s(literal 4 binary64))) (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (.f64 (pow.f64 F #s(literal 6 binary64)) B)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B))) (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 #s(literal -1 binary64) (neg.f64 x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) (+.f64 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 #s(literal 1 binary64) x)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) (+.f64 #s(literal 1 binary64) x)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) #s(literal -1 binary64))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (/.f64 #s(literal -1 binary64) F))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)) (/.f64 (.f64 (pow.f64 (+.f64 (*.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))) #s(literal 1 binary64)) F)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 F))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 F #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 F) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 F #s(literal 4 binary64)))) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 F #s(literal 6 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 F F))))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 (.f64 F F) (sin.f64 B))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal -3/4 binary64))) (pow.f64 (+.f64 (.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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 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 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 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 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 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 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (+.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64)))) (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B))) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.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 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 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 (-.f64 x (.f64 (.f64 (*.f64 B B) x) #s(literal 1/3 binary64))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (-.f64 (neg.f64 (.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 (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 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 (tan B) B)
#s(approx (tan B) (.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (*.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (tan B) (.f64 (+.f64 (.f64 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (.f64 B B))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.f64 B B)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B)) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) B))
#s(approx (/ F (sin B)) (/.f64 F B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (*.f64 B B) F) #s(literal 1/6 binary64)) F) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (.f64 B B))) (.f64 #s(literal -1/6 binary64) F)) (.f64 B B)) F) B))
#s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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 (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))
#s(approx (sin B) (.f64 (+.f64 (.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 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 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 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 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 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 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 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (+.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 binary64)))) (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B))) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))) x) B))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.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 (+.f64 (.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 (+.f64 (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 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 (-.f64 x (.f64 (.f64 (*.f64 B B) x) #s(literal 1/3 binary64))) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (-.f64 (neg.f64 (.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 (* x (/ 1 (tan B))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (.f64 x #s(literal 1/105 binary64)) (.f64 #s(literal -1/3 binary64) (.f64 x #s(literal 1/45 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 (/ x B) (/.f64 x B))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) B))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (.f64 B B))) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) B))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.f64 B B)) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64))))) (.f64 B B)) (.f64 (.f64 #s(literal 1/6 binary64) F) (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)))) (.f64 B B)) (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))) B))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) B)
#s(approx (* B (+ (* -1/6 (* B B)) 1)) (.f64 (+.f64 (.f64 (*.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B))
#s(approx (+ (* -1/6 (* B B)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/6 (* B B)) 1) (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* -1/6 (* B B)) (.f64 (.f64 B B) #s(literal -1/6 binary64)))
#s(approx (* B B) (*.f64 B B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))) (/.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 (tan B) (tan.f64 B))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
#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 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))) (/.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 (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) (*.f64 (pow.f64 B #s(literal 3 binary64)) #s(literal -1/6 binary64)))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) (*.f64 (-.f64 (pow.f64 B #s(literal -2 binary64)) #s(literal 1/6 binary64)) (pow.f64 B #s(literal 3 binary64))))
#s(approx (+ (* -1/6 (* B B)) 1) (.f64 (.f64 B B) #s(literal -1/6 binary64)))
#s(approx (+ (* -1/6 (* B B)) 1) (.f64 (-.f64 (pow.f64 B #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 B B)))
#s(approx (* B (+ (* -1/6 (* B B)) 1)) (neg.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (pow.f64 B #s(literal -2 binary64))) (pow.f64 B #s(literal 3 binary64)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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))))) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.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))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.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))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (* x 1) x)
#s(approx (* x 1) x)
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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)))) (+.f64 (neg.f64 (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.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)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.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)))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.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 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (neg.f64 x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/2 binary64)) (.f64 (.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 F F) #s(literal 2 binary64)))
#s(approx (* x 2) (*.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 (sqrt.f64 (pow.f64 (+.f64 (.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))))) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (*.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))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.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))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F B))) (pow.f64 B #s(literal -1 binary64))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (+.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F B))) (-.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (/.f64 x B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (pow.f64 B #s(literal -1 binary64)))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F (/.f64 x B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F B)))) (pow.f64 B #s(literal -1 binary64))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 (-.f64 (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) #s(literal 1 binary64)) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1 binary64)) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1 binary64)) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (neg x) (neg.f64 x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B)))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F B))) (pow.f64 B #s(literal -1 binary64))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (+.f64 (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F B))) (-.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F (/.f64 x B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (pow.f64 B #s(literal -1 binary64)))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F B)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F (/.f64 x B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (neg.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F B)))) (pow.f64 B #s(literal -1 binary64))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F B))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 (-.f64 (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) #s(literal 1 binary64)) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1 binary64)) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (+.f64 (.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) #s(literal 1 binary64)) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (neg.f64 (.f64 (.f64 F x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 #s(literal -5/2 binary64) (.f64 F x)) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (.f64 (neg.f64 F) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (neg.f64 x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64))) #s(literal 3/2 binary64)) (.f64 (.f64 #s(literal -5/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -7 binary64))))) x) (neg.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) x) (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) x) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))) x) (sqrt.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) x) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64)))) x) (sqrt.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)))))
#s(approx (neg (sqrt (* x 2))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))
#s(approx (sqrt (* x 2)) (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))
#s(approx (* x 2) (*.f64 #s(literal 2 binary64) x))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (neg.f64 (.f64 (.f64 F (/.f64 x (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 3/2 binary64) (/.f64 F (sin.f64 B))) (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -5 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -3 binary64))) (/.f64 F (sin.f64 B))))) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (+.f64 (*.f64 F 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 (.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 (.f64 (.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (.f64 (+.f64 (.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 (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.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 -5 binary64))) (/.f64 (.f64 (+.f64 (.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 (cos.f64 B) (sin.f64 B))) x))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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)))) (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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)) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.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))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (+.f64 (/.f64 (+.f64 (.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))))) (.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 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 x #s(literal -5 binary64))) (/.f64 (.f64 (+.f64 (.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 (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 x #s(literal -7 binary64))) (/.f64 (.f64 (pow.f64 (+.f64 (.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 (/.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 -5 binary64))) (/.f64 (.f64 (+.f64 (.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 (cos.f64 B) (sin.f64 B))) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (-.f64 (.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64))) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64)) (-.f64 (.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64)))) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (-.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (pow.f64 (+.f64 (.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 -7 binary64)))) #s(literal 1/16 binary64)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64))) (pow.f64 B #s(literal -1 binary64))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (-.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal 1 binary64)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (-.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64)) (.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (-.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal 1/16 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (.f64 (/.f64 (.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64))) #s(literal 1 binary64)) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (-.f64 (.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64))) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64)) (-.f64 (.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (pow.f64 B #s(literal -1 binary64)))) x))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (-.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (pow.f64 (+.f64 (.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 -7 binary64)))) #s(literal 1/16 binary64)) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64))) (pow.f64 B #s(literal -1 binary64))) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (-.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal 1 binary64)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (-.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64)) (.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64)) x))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (-.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal 1/16 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (.f64 (.f64 (/.f64 (.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal -1/8 binary64))) #s(literal 1 binary64)) x))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal 1/16 binary64))) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (.f64 (.f64 (.f64 F (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal -1/2 binary64)) (+.f64 (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) #s(literal 1/16 binary64))) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) F) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) #s(literal -1/8 binary64)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) x)) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) x))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) x)) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) x))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 5/2 binary64)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) x)) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) x))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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)) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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))) (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 (.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))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+ 2 (+ (* 2 x) (* F F))) (*.f64 #s(literal 2 binary64) x))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (+.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) x) #s(literal 2 binary64)) x))
#s(approx (+ (* 2 x) (* F F)) (.f64 (+.f64 (/.f64 (.f64 F F) 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))))) (.f64 (neg.f64 x) (+.f64 (neg.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)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) 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 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B))) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))) x)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B))) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))))
#s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 x) #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal -1/2 binary64)) (sin.f64 B))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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)))))
#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))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) (+.f64 (+.f64 (.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 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))
#s(approx (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 x) #s(literal -1 binary64))) (/.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.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)))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (+ (* 2 x) (* F F))) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) 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 (neg.f64 x) (+.f64 (neg.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)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) 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 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B))) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))) x)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) B) (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) x)) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) B)) (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))) x)) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.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))) x)) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.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))) x)) #s(literal 1 binary64))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) B) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) B) (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))) x)) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) B)) (.f64 (.f64 (.f64 (/.f64 F B) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))) x)) (pow.f64 B #s(literal -1 binary64)))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) F) (sqrt.f64 (pow.f64 x #s(literal -3 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.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))) x)) #s(literal 1 binary64))))
#s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (neg.f64 x) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.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))) x)) #s(literal 1 binary64))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.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))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.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))))
#s(approx (* (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) F) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 x)) #s(literal -1/16 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1/2 binary64))) (pow.f64 (sqrt.f64 x) #s(literal -1 binary64))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.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)))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (sqrt.f64 (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (+.f64 (.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 (+.f64 (.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)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))))
#s(approx (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F))))) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 x) #s(literal -1 binary64))) (/.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.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 (+.f64 (.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)))) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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 (sqrt (+ 2 (+ (* 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 2 binary64) x)))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 2 binary64) x))))))
#s(approx (sqrt (+ 2 (+ (* 2 x) (* F F)))) (.f64 (neg.f64 x) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 x #s(literal -7 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 5/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 x #s(literal -3 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.f64 F F) #s(literal 2 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 2 binary64) x)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 x #s(literal -5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 3/2 binary64)))))))
#s(approx (neg (sqrt (* x 2))) (sqrt.f64 (*.f64 #s(literal 2 binary64) x)))
#s(approx (sqrt (* x 2)) (neg.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) x))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (+.f64 (.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 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B))) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (.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))))
#s(approx (* (/ F (sin B)) (/ 1 (sqrt (+ 2 (+ (* 2 x) (* F F)))))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (.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)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 F (sqrt.f64 #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 (+.f64 (.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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal 3 binary64))))) (pow.f64 (sqrt.f64 x) #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal -1/2 binary64)) (sin.f64 B))))) (pow.f64 x #s(literal 3 binary64)))) (+.f64 (/.f64 (.f64 F (sqrt.f64 (.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (sin.f64 B)) (.f64 (.f64 (.f64 (/.f64 F (sin.f64 B)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.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)))))
#s(approx (+ 2 (+ (* 2 x) (* F F))) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) x)) #s(literal 2 binary64))))
#s(approx (+ (* 2 x) (* F F)) (.f64 (neg.f64 x) (-.f64 (neg.f64 (/.f64 (.f64 F F) x)) #s(literal 2 binary64))))

eval68.0ms (0.8%)

Memory: 42.6MiB live, 134.3MiB allocated; 7ms collecting garbage
Compiler: Compiled 33 168 to 2 866 computations (91.4% saved)

prune95.0ms (1.1%)

Memory

-2.9MiB live, 186.1MiB allocated; 16ms collecting garbage

Pruning

69 alts after pruning (65 fresh and 4 done)

	Pruned	Kept	Total
New	519	16	535
Fresh	8	49	57
Picked	3	2	5
Done	0	2	2
Total	530	69	599

Accuracy

99.9%

Counts

599 → 69

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.8%	(+.f64 (neg.f64 (/.f64 (.f64 x #s(literal 1 binary64)) (/.f64 (sin.f64 B) (cos.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))))))
	72.9%	(+.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 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
	59.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 #s(literal -1 binary64) (sin.f64 B))))
	59.0%	(+.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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B))))
	49.4%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
	58.9%	(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
	67.8%	(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) #s(approx (sin B) B)))
	23.1%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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))))
	35.2%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
	33.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
	42.8%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
	47.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
	34.3%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
	35.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
	43.4%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64)))))))
	34.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B B)) #s(literal 1 binary64)))))))
	17.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
	34.3%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
	47.9%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
	27.7%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
	27.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
	34.6%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
	27.8%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
	27.1%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
	27.2%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
	34.0%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
	34.0%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
	34.0%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
	34.2%	(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64)) B))))
	56.7%	(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
	42.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
	49.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
	29.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
	34.1%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) x) B))
	42.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
	43.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
	19.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
	30.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
	30.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #s(literal 1 binary64)))))) F) x) B))
	26.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
✓	17.7%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 binary64)))))) F) x) B))
	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
	29.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
	26.9%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
	25.2%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)) #s(literal 1 binary64))) x) B))
	23.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
	19.6%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
	26.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))
✓	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))
	26.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))) #s(literal 1 binary64)))) B))
	18.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
✓	27.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
	29.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (/.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
	34.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (-.f64 (/.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
✓	59.5%	#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))))
	34.7%	#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)) #s(approx (sin B) B))))
	34.6%	#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 #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))))) x)) (sin.f64 B))))
	34.6%	#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B B) x))))))) (sin.f64 B))))
	44.9%	#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) #s(approx (* (cos B) x) x)) (sin.f64 B))))
	51.8%	#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))))
	59.5%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 #s(approx (+ 1 (* (cos B) x)) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64))))) (sin.f64 B))))
	24.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
	23.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))))
	27.8%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
	34.0%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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)))
	25.4%	#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

Compiler

Compiled 9 614 to 3 153 computations (67.2% saved)

regimes169.0ms (2%)

Memory

-35.5MiB live, 211.6MiB allocated; 104ms collecting garbage

Counts

111 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
(+.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 #s(literal -1 binary64) (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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (.f64 #s(literal -1 binary64) (/.f64 x B))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) (/.f64 F (sin.f64 B)))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.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 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) 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))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)) F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 #s(approx (+ 1 (* (cos B) x)) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64))))) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) #s(approx (sin B) B)))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.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))) (.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 #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (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))))))
(+.f64 (neg.f64 (/.f64 (.f64 x #s(literal 1 binary64)) (/.f64 (sin.f64 B) (cos.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 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (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))))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Calls

4 calls:

73.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))))))
31.0ms	x
28.0ms	F
28.0ms	B

Results

Accuracy	Segments	Branch
86.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.8%	3	`F`
81.7%	1	`B`
81.7%	1	`x`

Compiler

Compiled 30 to 29 computations (3.3% saved)

regimes37.0ms (0.4%)

Memory

14.7MiB live, 64.0MiB allocated; 6ms collecting garbage

Counts

107 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
(+.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 #s(literal -1 binary64) (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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (.f64 #s(literal -1 binary64) (/.f64 x B))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) (/.f64 F (sin.f64 B)))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.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 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) 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))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (*.f64 F F)) #s(literal 1 binary64)) F))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (neg.f64 (/.f64 #s(approx (+ 1 (* (cos B) x)) (*.f64 x (+.f64 (cos.f64 B) (pow.f64 x #s(literal -1 binary64))))) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x #s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B))))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) #s(approx (sin B) B)))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.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 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

(+.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 (*.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Calls

1 calls:

30.0ms

Results

Accuracy	Segments	Branch
99.7%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes39.0ms (0.5%)

Memory

-10.3MiB live, 73.6MiB allocated; 8ms collecting garbage

Counts

101 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
(+.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 #s(literal -1 binary64) (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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (.f64 #s(literal -1 binary64) (/.f64 x B))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) (/.f64 F (sin.f64 B)))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))

Outputs

(+.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 #s(literal -1 binary64) (sin.f64 B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) (/.f64 F (sin.f64 B)))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Calls

1 calls:

27.0ms

Results

Accuracy	Segments	Branch
99.7%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes37.0ms (0.4%)

Memory

33.4MiB live, 83.8MiB allocated; 9ms collecting garbage

Counts

99 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
(+.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 #s(literal -1 binary64) (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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (.f64 #s(literal -1 binary64) (/.f64 x B))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B))))

Outputs

(+.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 #s(literal -1 binary64) (sin.f64 B))))

(+.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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Calls

1 calls:

30.0ms

Results

Accuracy	Segments	Branch
93.1%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes55.0ms (0.6%)

Memory

-6.9MiB live, 78.8MiB allocated; 24ms collecting garbage

Counts

98 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))
(+.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 #s(literal -1 binary64) (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 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 F (sin.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (.f64 (/.f64 F (sin.f64 B)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) #s(literal -1 binary64)))))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (neg.f64 x) B)) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 #s(approx (neg (* x (/ 1 (tan B)))) (.f64 #s(literal -1 binary64) (/.f64 x B))) (/.f64 (.f64 F (pow.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)) #s(literal -1/2 binary64))) (sin.f64 B)))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Calls

1 calls:

37.0ms

Results

Accuracy	Segments	Branch
93.0%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes34.0ms (0.4%)

Memory

-4.9MiB live, 40.4MiB allocated; 7ms collecting garbage

Counts

92 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Outputs

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))

Calls

1 calls:

28.0ms

Results

Accuracy	Segments	Branch
93.0%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes55.0ms (0.6%)

Memory

-6.3MiB live, 40.5MiB allocated; 30ms collecting garbage

Counts

91 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

Outputs

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))

Calls

1 calls:

49.0ms

Results

Accuracy	Segments	Branch
93.0%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes29.0ms (0.3%)

Memory

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

Counts

90 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin 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))))) (neg.f64 (/.f64 (+.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))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))

Calls

1 calls:

23.0ms

Results

Accuracy	Segments	Branch
93.0%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes54.0ms (0.6%)

Memory

-28.2MiB live, 67.0MiB allocated; 6ms collecting garbage

Counts

89 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (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) #s(approx (* (cos B) x) x)) (sin.f64 B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))

Calls

2 calls:

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

22.0ms

Results

Accuracy	Segments	Branch
75.1%	4	`(+.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))))))`
88.0%	3	`F`

Compiler

Compiled 28 to 23 computations (17.9% saved)

regimes75.0ms (0.9%)

Memory

2.6MiB live, 97.6MiB allocated; 8ms collecting garbage

Counts

87 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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 (+ (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))))

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) #s(approx (* (cos B) x) x)) (sin.f64 B))))

(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))

(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))

Calls

3 calls:

24.0ms	x
23.0ms	F
22.0ms	B

Results

Accuracy	Segments	Branch
76.4%	4	`x`
68.1%	2	`B`
82.4%	3	`F`

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes28.0ms (0.3%)

Memory

-8.0MiB live, 37.4MiB allocated; 3ms collecting garbage

Counts

85 → 4

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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 (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 (+.f64 (.f64 x #s(literal 1/45 binary64)) (neg.f64 (.f64 (.f64 F #s(literal -7/360 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (.f64 B B))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) 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) #s(approx (* (cos B) x) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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))))

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
80.5%	4	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes29.0ms (0.3%)

Memory

-0.1MiB live, 44.0MiB allocated; 4ms collecting garbage

Counts

83 → 4

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (/ ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B)) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (*.f64 #s(literal -2 binary64) x)))))))

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) #s(approx (* (cos B) x) x)) (sin.f64 B))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))))))

Calls

1 calls:

21.0ms

Results

Accuracy	Segments	Branch
78.5%	4	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes156.0ms (1.8%)

Memory

13.5MiB live, 152.4MiB allocated; 105ms collecting garbage

Counts

81 → 2

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x 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)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))

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) #s(approx (* (cos B) x) x)) (sin.f64 B))))

(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (*.f64 F #s(literal 1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (*.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))))

Calls

4 calls:

66.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))))))
33.0ms	B
30.0ms	F
20.0ms	x

Results

Accuracy	Segments	Branch
56.7%	1	`B`
61.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))))))`
60.2%	2	`x`
67.8%	2	`F`

Compiler

Compiled 30 to 29 computations (3.3% saved)

regimes37.0ms (0.4%)

Memory

1.7MiB live, 46.0MiB allocated; 23ms collecting garbage

Counts

77 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 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) #s(approx (* (cos B) x) x)) (sin.f64 B))))

(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (*.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* 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(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))

Calls

1 calls:

31.0ms

Results

Accuracy	Segments	Branch
67.7%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes29.0ms (0.3%)

Memory

-0.5MiB live, 45.4MiB allocated; 7ms collecting garbage

Counts

75 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x)) #s(literal 2 binary64)))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (+.f64 x x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))

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) #s(approx (* (cos B) x) x)) (sin.f64 B))))

(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (*.f64 F #s(literal 1 binary64)) (*.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))

Calls

1 calls:

24.0ms

Results

Accuracy	Segments	Branch
67.2%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes63.0ms (0.7%)

Memory

4.6MiB live, 110.2MiB allocated; 6ms collecting garbage

Counts

72 → 2

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.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) #s(approx (* (cos B) x) 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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) #s(approx (sin B) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/6 binary64) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))) (.f64 #s(literal -1/3 binary64) x)) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) F)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) (sin B))) (/.f64 (-.f64 (+.f64 (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x))))) (.f64 (.f64 B B) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (+.f64 #s(literal 2 binary64) (.f64 F F)) (.f64 #s(literal -2 binary64) x)))))) (.f64 #s(literal 1/3 binary64) x)))) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 B B) F) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))) (.f64 F (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))) B)))
#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 #s(approx (cos B) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 B 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 F (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) #s(literal -1 binary64))) F)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #s(literal -1 binary64)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)) (.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)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.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))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 B) x)) #s(approx (sin B) (.f64 B (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 B B))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #s(approx (pow (+ (+ ( F F) 2) (* 2 x)) (neg (/ 1 2))) (/.f64 #s(literal -1 binary64) F))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (neg.f64 (.f64 (.f64 B B) (+.f64 (-.f64 (.f64 #s(literal 1/720 binary64) F) (.f64 #s(literal -1/6 binary64) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/5040 binary64) F)))) (.f64 F #s(literal -7/360 binary64)))) (.f64 #s(literal -1/6 binary64) F))) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.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 #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))))) 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) #s(literal -1 binary64)))) (/.f64 (neg.f64 x) B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (.f64 F F)))) (pow.f64 B #s(literal -1 binary64))) (/.f64 x B))))
#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) #s(approx (* (cos B) x) (+.f64 x (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/2 binary64) x) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 B 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 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 x B)) (.f64 (/.f64 F B) (sqrt.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x)) #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) #s(approx (* (cos B) x) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))

Calls

3 calls:

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

19.0ms

18.0ms

Results

Accuracy	Segments	Branch
47.9%	2	`x`
55.2%	4	`(+.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))))))`
59.4%	2	`F`

Compiler

Compiled 29 to 26 computations (10.3% saved)

regimes32.0ms (0.4%)

Memory

6.4MiB live, 53.1MiB allocated; 1ms collecting garbage

Counts

52 → 2

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.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))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 binary64) (sin.f64 B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (+.f64 (.f64 #s(literal -1/5040 binary64) (.f64 B B)) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))

Outputs

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))

Calls

2 calls:

14.0ms	F
13.0ms	B

Results

Accuracy	Segments	Branch
52.7%	2	`B`
53.8%	2	`F`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes43.0ms (0.5%)

Memory

20.2MiB live, 66.7MiB allocated; 2ms collecting garbage

Counts

50 → 2

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 x #s(literal 2 binary64)))))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))) (/.f64 (-.f64 #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))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (.f64 B (.f64 F F))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (-.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 x)) B) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))) (.f64 (.f64 F F) B)))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -7/360 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (.f64 (.f64 F (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 x)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (/ (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) B) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) x) B)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 B (*.f64 F F)))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))) #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 (/.f64 (.f64 #s(literal 1 binary64) F) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) x))))) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) (*.f64 x (+.f64 (/.f64 #s(literal 2 binary64) x) #s(literal 2 binary64))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal -31/15120 binary64) (.f64 B B)) #s(literal 7/360 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64)) B))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (*.f64 F F))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ 2 (+ ( 2 x) (* F F))) (.f64 (.f64 F F) (+.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x)) (.f64 F F)) #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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (.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))))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 (.f64 (.f64 B B) F) #s(literal 1/6 binary64)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 #s(approx (sin B) (.f64 (+.f64 (.f64 (.f64 B B) #s(literal -1/6 binary64)) #s(literal 1 binary64)) B)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.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 #s(approx (+ (- ( (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (.f64 B B))))) (.f64 B B)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F)))) F)) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 #s(approx (/ F (sin B)) (/.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 B B) F)) F) B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64)) (.f64 B B)) #s(literal 1 binary64)) B))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 B (+.f64 (.f64 (.f64 B B) (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 B B)) #s(literal 1/6 binary64))) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 2 binary64) x) (.f64 F F))))))))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F #s(approx (sin B) (.f64 (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ (* 2 x) (* F F)) (*.f64 #s(literal 2 binary64) x))))))))

Outputs

(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (*.f64 B (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B))

Calls

3 calls:

14.0ms

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

Results

Accuracy	Segments	Branch
48.5%	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))))))`
43.5%	1	`B`
49.8%	2	`F`

Compiler

Compiled 29 to 26 computations (10.3% saved)

regimes47.0ms (0.5%)

Memory

-37.1MiB live, 13.7MiB allocated; 3ms collecting garbage

Counts

22 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.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 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 2 (+ ( 2 x) (* F F)))) (neg.f64 (sqrt.f64 (*.f64 x #s(literal 2 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) x))))) F) x) B))

Outputs

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (*.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 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))

Calls

1 calls:

45.0ms

Results

Accuracy	Segments	Branch
51.2%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

18 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) x))) (*.f64 F F)))) x) B))

Outputs

(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (*.f64 B (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 B 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 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))

Calls

1 calls:

5.0ms

Results

Accuracy	Segments	Branch
51.1%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

15 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 binary64))))) F) x) B))
(+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) #s(approx (/ -1 (sin B)) (/.f64 (-.f64 (.f64 #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 #s(approx (- (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) x) (.f64 x (-.f64 (.f64 (.f64 B B) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 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 #s(approx (+ (* (+ (- (* (* 1/6 F) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))) (* -1/3 x)) (* (+ (* x 1/45) (neg (* (* F -7/360) (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F))))))) (* B B))) (* B B)) (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F)) (.f64 (.f64 B B) (.f64 x (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal 1/45 binary64) (*.f64 B B)))))) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #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 (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 #s(literal 2 binary64) x)))) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) (*.f64 F F)))) F) x) B))

Outputs

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (*.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (*.f64 x x)) (+.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ (* 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
51.1%	3	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes12.0ms (0.1%)

Memory

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

Counts

8 → 3

Calls

Call 1

Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (*.f64 #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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) B) (/.f64 x B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 #s(approx (/ 1 (sqrt (+ (+ ( 2 x) 2) (* F F)))) (/.f64 #s(literal -1 binary64) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (+ ( 2 x) 2) (* F F))) F)) F) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) B))

Outputs

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))

Calls

4 calls:

3.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))))))
3.0ms	F
3.0ms	B
3.0ms	x

Results

Accuracy	Segments	Branch
34.8%	1	`B`
37.0%	2	`x`
34.8%	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))))))`
45.1%	3	`F`

Compiler

Compiled 30 to 29 computations (3.3% saved)

regimes52.0ms (0.6%)

Memory

-44.2MiB live, 2.8MiB allocated; 2ms collecting garbage

Counts

2 → 2

Calls

Call 1

Inputs

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B))

Outputs

#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

Calls

1 calls:

1.0ms

Results

Accuracy	Segments	Branch
40.3%	2	`F`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes5.0ms (0.1%)

Memory

9.5MiB live, 9.5MiB 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))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

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	F
1.0ms	x
1.0ms	B

Results

Accuracy	Segments	Branch
27.5%	1	`B`
27.5%	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))))))`
27.5%	1	`x`
27.5%	1	`F`

Compiler

Compiled 30 to 29 computations (3.3% saved)

bsearch87.0ms (1%)

Memory

35.4MiB live, 81.0MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
51.0ms	5.114359653723353e-22	2.6213131128903915e-18
29.0ms	-1.635605893557839e+43	-4.2985219180553865e+40

Samples

65.0ms	256×	0	valid
3.0ms	21×	0	invalid

Compiler

Compiled 926 to 746 computations (19.4% saved)

Precisions

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

ival-sin: 28.0ms (47.1% of total)

ival-mult: 7.0ms (11.8% of total)

ival-tan: 7.0ms (11.8% of total)

ival-div: 6.0ms (10.1% of total)

ival-pow: 5.0ms (8.4% of total)

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

ival-neg: 2.0ms (3.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)

bsearch67.0ms (0.8%)

Memory

2.7MiB live, 48.5MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.114359653723353e-22	2.6213131128903915e-18
61.0ms	-4.572595216045821e+56	-3.2437232146363347e+44

Samples

51.0ms	160×	0	valid
2.0ms	14×	0	invalid

Compiler

Compiled 1 368 to 1 074 computations (21.5% saved)

Precisions

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

ival-sin: 27.0ms (57% of total)

ival-mult: 5.0ms (10.6% of total)

ival-div: 4.0ms (8.4% of total)

ival-tan: 4.0ms (8.4% of total)

ival-pow: 3.0ms (6.3% of total)

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

ival-neg: 2.0ms (4.2% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.114359653723353e-22	2.6213131128903915e-18
1.0ms	-1.635605893557839e+43	-4.2985219180553865e+40

Compiler

Compiled 1 214 to 938 computations (22.7% saved)

bsearch61.0ms (0.7%)

Memory

-25.2MiB live, 69.2MiB allocated; 12ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
33.0ms	5.441892462788373e-25	5.114359653723353e-22
18.0ms	-255359015931018.94	-76979198644895.98

Samples

38.0ms	208×	0	valid
3.0ms	18×	0	invalid

Compiler

Compiled 970 to 774 computations (20.2% saved)

Precisions

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

ival-mult: 6.0ms (20% of total)

ival-div: 5.0ms (16.7% of total)

ival-sin: 5.0ms (16.7% of total)

ival-tan: 5.0ms (16.7% of total)

ival-pow: 4.0ms (13.3% of total)

ival-add: 3.0ms (10% of total)

ival-neg: 2.0ms (6.7% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.441892462788373e-25	5.114359653723353e-22
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 970 to 748 computations (22.9% saved)

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.441892462788373e-25	5.114359653723353e-22
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 970 to 748 computations (22.9% saved)

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.441892462788373e-25	5.114359653723353e-22
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 1 058 to 796 computations (24.8% saved)

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.441892462788373e-25	5.114359653723353e-22
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 1 088 to 811 computations (25.5% saved)

bsearch7.0ms (0.1%)

Memory

-36.4MiB live, 6.6MiB allocated; 8ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
5.0ms	5.441892462788373e-25	5.114359653723353e-22
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 1 098 to 816 computations (25.7% saved)

bsearch35.0ms (0.4%)

Memory

18.7MiB live, 63.9MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
31.0ms	6.82833708371422e-12	1.6221146118409226e-7
1.0ms	-255359015931018.94	-76979198644895.98

Samples

21.0ms	128×	0	valid
1.0ms	8×	0	invalid

Compiler

Compiled 1 090 to 808 computations (25.9% saved)

Precisions

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

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

ival-mult: 3.0ms (16.7% of total)

ival-sin: 3.0ms (16.7% of total)

ival-tan: 3.0ms (16.7% of total)

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

ival-pow: 2.0ms (11.1% of total)

ival-neg: 1.0ms (5.6% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch107.0ms (1.2%)

Memory

-22.2MiB live, 83.3MiB allocated; 21ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
21.0ms	4.4155863701858856e+222	2.1050046243448902e+223
75.0ms	6.5143212097593964e-102	4.1379422059280464e-70
1.0ms	-255359015931018.94	-76979198644895.98

Samples

45.0ms	272×	0	valid
3.0ms	20×	0	invalid

Compiler

Compiled 2 049 to 1 504 computations (26.6% saved)

Precisions

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

ival-mult: 7.0ms (17.7% of total)

ival-tan: 7.0ms (17.7% of total)

ival-div: 6.0ms (15.2% of total)

ival-sin: 6.0ms (15.2% of total)

ival-pow: 5.0ms (12.7% of total)

ival-add: 4.0ms (10.1% of total)

ival-neg: 3.0ms (7.6% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch23.0ms (0.3%)

Memory

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

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	9.153723836663051e+195	2.807941674644901e+196
2.0ms	6.5143212097593964e-102	4.1379422059280464e-70
1.0ms	-255359015931018.94	-76979198644895.98

Samples

13.0ms

80×

valid

Compiler

Compiled 1 938 to 1 424 computations (26.5% saved)

Precisions

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

ival-div: 2.0ms (19.1% of total)

ival-mult: 2.0ms (19.1% of total)

ival-sin: 2.0ms (19.1% of total)

ival-tan: 2.0ms (19.1% of total)

ival-pow: 2.0ms (19.1% of total)

ival-add: 1.0ms (9.6% of total)

ival-neg: 1.0ms (9.6% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch33.0ms (0.4%)

Memory

-3.5MiB live, 42.1MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
30.0ms	-1.7368257051980027e+37	-1.7840708673814692e+35

Samples

19.0ms	112×	0	valid
2.0ms	13×	0	invalid

Compiler

Compiled 653 to 488 computations (25.3% saved)

Precisions

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

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

ival-mult: 3.0ms (17.6% of total)

ival-sin: 3.0ms (17.6% of total)

ival-tan: 3.0ms (17.6% of total)

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

ival-pow: 2.0ms (11.7% of total)

ival-neg: 1.0ms (5.9% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch64.0ms (0.7%)

Memory

-16.0MiB live, 79.6MiB allocated; 14ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
44.0ms	7.575008975926912e+113	3.3259783742235133e+124
14.0ms	-1.7368257051980027e+37	-1.7840708673814692e+35

Samples

43.0ms	224×	0	valid
2.0ms	11×	0	invalid

Compiler

Compiled 1 811 to 1 221 computations (32.6% saved)

Precisions

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

ival-tan: 12.0ms (31.7% of total)

ival-mult: 6.0ms (15.9% of total)

ival-div: 5.0ms (13.2% of total)

ival-sin: 5.0ms (13.2% of total)

ival-pow: 5.0ms (13.2% of total)

ival-add: 3.0ms (7.9% of total)

ival-neg: 2.0ms (5.3% 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)

bsearch75.0ms (0.9%)

Memory

32.1MiB live, 121.0MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
28.0ms	2.1054589607947033e-13	6.82833708371422e-12
39.0ms	-1012.9102463578403	-7.667333309778509e-11

Samples

50.0ms	272×	0	valid
4.0ms	26×	0	invalid

Compiler

Compiled 1 667 to 1 138 computations (31.7% saved)

Precisions

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

ival-mult: 8.0ms (17.9% of total)

ival-tan: 7.0ms (15.7% of total)

ival-div: 6.0ms (13.4% of total)

ival-add: 6.0ms (13.4% of total)

ival-sin: 6.0ms (13.4% of total)

ival-neg: 6.0ms (13.4% of total)

ival-pow: 5.0ms (11.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)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 470 to 341 computations (27.4% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-255359015931018.94	-76979198644895.98

Compiler

Compiled 485 to 346 computations (28.7% saved)

bsearch86.0ms (1%)

Memory

-37.3MiB live, 62.2MiB allocated; 13ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
82.0ms	-4.459189499187148e+34	-1.5205512469029199e+29

Samples

59.0ms	144×	0	valid
2.0ms	15×	0	invalid

Compiler

Compiled 876 to 620 computations (29.2% saved)

Precisions

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

ival-neg: 37.0ms (65.2% of total)

ival-mult: 4.0ms (7.1% of total)

ival-tan: 4.0ms (7.1% of total)

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

ival-sin: 3.0ms (5.3% of total)

ival-pow: 3.0ms (5.3% of total)

ival-add: 2.0ms (3.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)

bsearch23.0ms (0.3%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.114359653723353e-22	2.6213131128903915e-18
19.0ms	-1012.9102463578403	-7.667333309778509e-11

Samples

13.0ms	80×	0	valid
1.0ms	6×	0	invalid

Compiler

Compiled 1 986 to 1 276 computations (35.8% saved)

Precisions

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

ival-div: 2.0ms (17.9% of total)

ival-mult: 2.0ms (17.9% of total)

ival-sin: 2.0ms (17.9% of total)

ival-tan: 2.0ms (17.9% of total)

ival-pow: 2.0ms (17.9% of total)

ival-add: 1.0ms (8.9% of total)

ival-neg: 1.0ms (8.9% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch16.0ms (0.2%)

Memory

-14.4MiB live, 31.8MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.114359653723353e-22	2.6213131128903915e-18
14.0ms	-1012.9102463578403	-7.667333309778509e-11

Samples

8.0ms	48×	0	valid
0.0ms	2×	0	invalid

Compiler

Compiled 1 846 to 1 216 computations (34.1% saved)

Precisions

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

ival-div: 1.0ms (15.1% of total)

ival-add: 1.0ms (15.1% of total)

ival-mult: 1.0ms (15.1% of total)

ival-sin: 1.0ms (15.1% of total)

ival-tan: 1.0ms (15.1% of total)

ival-pow: 1.0ms (15.1% 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)

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

bsearch41.0ms (0.5%)

Memory

14.3MiB live, 60.5MiB allocated; 2ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.114359653723353e-22	2.6213131128903915e-18
35.0ms	-1.5564119029926612e-13	-2.661209302961088e-20

Samples

24.0ms	144×	0	valid
4.0ms	18×	0	invalid

Compiler

Compiled 2 106 to 1 167 computations (44.6% saved)

Precisions

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

ival-mult: 5.0ms (21.8% of total)

ival-tan: 4.0ms (17.5% of total)

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

ival-sin: 3.0ms (13.1% of total)

ival-pow: 3.0ms (13.1% of total)

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

ival-neg: 1.0ms (4.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)

bsearch83.0ms (1%)

Memory

-1.5MiB live, 94.5MiB allocated; 10ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
28.0ms	2.9566767837974426e-104	6.5143212097593964e-102
49.0ms	-3.9078401042579755e-168	-1.1291822320372534e-170

Samples

61.0ms	240×	0	valid
4.0ms	26×	0	invalid

Compiler

Compiled 1 485 to 956 computations (35.6% saved)

Precisions

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

ival-mult: 26.0ms (47.9% of total)

ival-tan: 6.0ms (11% of total)

ival-div: 5.0ms (9.2% of total)

ival-sin: 5.0ms (9.2% of total)

ival-add: 4.0ms (7.4% of total)

ival-pow: 4.0ms (7.4% of total)

ival-neg: 2.0ms (3.7% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-3.9078401042579755e-168	-1.1291822320372534e-170

Compiler

Compiled 806 to 522 computations (35.2% saved)

simplify79.0ms (0.9%)

Memory

8.0MiB live, 97.3MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	269	2798
1	408	2654
2	641	2626
3	1299	2626
4	4533	2626

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 F #s(literal -43000000000000002394313159889282024865792 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 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 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -330000000000000013264860134658327195607367680 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 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 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -43000000000000002394313159889282024865792 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) (/.f64 F (sin.f64 B))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B)))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 3022314549036573/18889465931478580854784 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5771778251424973/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (if (<=.f64 F #s(literal 4499999999999999888654915639453545110008562238514342754425429955177464880560766822886283178042443808858560592583030210559517957271309745450464092762459335477283647325357460965147810155504518702372403901040214618451640057856 binary64)) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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)))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5771778251424973/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (if (<=.f64 F #s(literal 14999999999999999267149386958852698080083740691779325049199875835860267585624938774917581833758510342143813173150707385060422379875828739638953603889414680990655549807560137501165854807343629336576 binary64)) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))))))))))
(if (<=.f64 F #s(literal -319999999999999982584073915853701120 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))))
(if (<=.f64 F #s(literal -189999999999999997729744419786063872 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 299999999999999987169819040575957512300442602135347507185575726983550642943261859699871623379506848514756468075921408 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* 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(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))))
(if (<=.f64 F #s(literal -5674535530486825/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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 4208996133570293/618970019642690137449562112 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (.f64 #s(literal 2 binary64) 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -80000000000000 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -2499999999999999863938077467607040 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B 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 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -8376695306909123/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) #s(literal 1 binary64))) x) B)) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg ( x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -7656119366529843/4503599627370496 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg ( x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -3070091297427743/19807040628566084398385987584 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) B)) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -8285752687941567/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B)) (if (<=.f64 F #s(literal 4160851854339257/1260864198284623334792929283204595641762551656654894293374345388935863096687910739565256520156317300505812095689818112 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -8285752687941567/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

Outputs
(if (<=.f64 F #s(literal -43000000000000002394313159889282024865792 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 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 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -43000000000000002394313159889282024865792 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 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))))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -330000000000000013264860134658327195607367680 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 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 (.f64 (/.f64 F (sin.f64 B)) #s(literal 1 binary64)) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -330000000000000013264860134658327195607367680 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) (+.f64 (/.f64 (neg.f64 x) (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 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x)))))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(approx ( F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -43000000000000002394313159889282024865792 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) (/.f64 F (sin.f64 B))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -43000000000000002394313159889282024865792 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F)))) (/.f64 F (sin.f64 B))))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 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 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B)))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (pow.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))) #s(literal -1 binary64)) (/.f64 F B)))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (/.f64 (neg.f64 x) (tan.f64 B)) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(approx (* F (pow (- (+ (* F F) 2) (* -2 x)) -1/2)) #s(literal 1 binary64)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 5316911983139663/10633823966279326983230456482242756608 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #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 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 3022314549036573/18889465931478580854784 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 3022314549036573/18889465931478580854784 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5771778251424973/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (if (<=.f64 F #s(literal 4499999999999999888654915639453545110008562238514342754425429955177464880560766822886283178042443808858560592583030210559517957271309745450464092762459335477283647325357460965147810155504518702372403901040214618451640057856 binary64)) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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)))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 5771778251424973/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (if (<=.f64 F #s(literal 4499999999999999888654915639453545110008562238514342754425429955177464880560766822886283178042443808858560592583030210559517957271309745450464092762459335477283647325357460965147810155504518702372403901040214618451640057856 binary64)) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 F (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) (.f64 (/.f64 F (sin.f64 B)) #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)))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 5771778251424973/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (if (<=.f64 F #s(literal 14999999999999999267149386958852698080083740691779325049199875835860267585624938774917581833758510342143813173150707385060422379875828739638953603889414680990655549807560137501165854807343629336576 binary64)) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))) (+.f64 (neg.f64 (.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (*.f64 F F))))))))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (if (or (<=.f64 F #s(literal 5771778251424973/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) (not (<=.f64 F #s(literal 14999999999999999267149386958852698080083740691779325049199875835860267585624938774917581833758510342143813173150707385060422379875828739638953603889414680990655549807560137501165854807343629336576 binary64)))) (+.f64 (.f64 x (/.f64 #s(literal -1 binary64) (tan.f64 B))) #s(approx ( (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F B) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) x) #s(literal 2 binary64)) (.f64 F F))))))) (+.f64 (neg.f64 #s(approx ( x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 F (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x)))))))))
(if (<=.f64 F #s(literal -319999999999999982584073915853701120 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) x))))))))
(if (<=.f64 F #s(literal -319999999999999982584073915853701120 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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 F (.f64 (sin.f64 B) (sqrt.f64 (-.f64 (+.f64 (.f64 F F) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) x))))))))
(if (<=.f64 F #s(literal -189999999999999997729744419786063872 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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 299999999999999987169819040575957512300442602135347507185575726983550642943261859699871623379506848514756468075921408 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* 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(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))))
(if (<=.f64 F #s(literal -189999999999999997729744419786063872 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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 299999999999999987169819040575957512300442602135347507185575726983550642943261859699871623379506848514756468075921408 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (.f64 (/.f64 F (sin.f64 B)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 2 binary64) #s(approx (+ ( 2 x) (* 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(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (+.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))))) x) B))))
(if (<=.f64 F #s(literal -5674535530486825/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) #s(approx (* (cos B) x) x)) (sin.f64 B)))) (if (<=.f64 F #s(literal 4208996133570293/618970019642690137449562112 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 (.f64 F #s(literal 1 binary64)) (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ (* 2 x) (* F F)) (.f64 #s(literal 2 binary64) 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -5674535530486825/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) #s(approx (* (cos B) x) x)) (sin.f64 B))) (if (<=.f64 F #s(literal 4208996133570293/618970019642690137449562112 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 F (.f64 (sin.f64 B) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) (* F F)) (.f64 #s(literal 2 binary64) 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 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -80000000000000 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) #s(approx (* (cos B) x) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -80000000000000 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) #s(approx (neg (/ (+ 1 (* (cos B) x)) (sin B))) (/.f64 #s(literal -1 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -2499999999999999863938077467607040 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B 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 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(approx (+ ( 2 x) 2) #s(literal 2 binary64)) (*.f64 F F)))) F) x) B)))
(if (<=.f64 F #s(literal -8376695306909123/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) #s(literal 1 binary64))) x) B)) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg ( x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -8376695306909123/4503599627370496 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) x)) (.f64 F F))) #s(literal 1 binary64))) x) B)) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg ( x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ (* 2 x) 2) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -7656119366529843/4503599627370496 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg ( x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -7656119366529843/4503599627370496 binary64)) (+.f64 (neg.f64 #s(approx (* x (/ 1 (tan B))) (/.f64 x B))) #s(approx (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2)))) (/.f64 #s(literal -1 binary64) #s(approx (sin B) (.f64 B (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 B B)) #s(literal 1 binary64))))))) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg ( x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ (* 2 x) 2) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -3070091297427743/19807040628566084398385987584 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) B)) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ 2 (* 2 x)) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -3070091297427743/19807040628566084398385987584 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (/.f64 (-.f64 (.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64))) (.f64 x x)) (+.f64 #s(approx ( (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x)) B)) (if (<=.f64 F #s(literal 1687496479023819/649037107316853453566312041152512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (+ ( 2 x) 2) (* F F)) #s(approx (+ (* 2 x) 2) #s(literal 2 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 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -8285752687941567/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal -1 binary64)) x) B)) (if (<=.f64 F #s(literal 4160851854339257/1260864198284623334792929283204595641762551656654894293374345388935863096687910739565256520156317300505812095689818112 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) #s(literal 1 binary64)) x) B))))
(if (<=.f64 F #s(literal -8285752687941567/2124551971267068394758352826209874509318372470908127692797776552801614239443408970956650009060917142675557317944986004061386317350610828957638079915066349407775325083341572876126912512 binary64)) #s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 (-.f64 #s(approx (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F 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 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (* (/ F (sin B)) (pow (+ (+ (* F F) 2) (* 2 x)) (neg (/ 1 2))))) (/.f64 #s(approx (- (* (/ 1 (sqrt (+ (+ (* 2 x) 2) (* F F)))) F) x) (neg.f64 x)) B))

derivations568.0ms (6.6%)

Memory

-25.7MiB live, 592.0MiB allocated; 79ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 948 to 264 computations (91% saved)

preprocess167.0ms (1.9%)

Memory: 19.9MiB live, 207.6MiB allocated; 18ms collecting garbage
Remove: (negabs B)
Compiler: Compiled 6 124 to 670 computations (89.1% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze568.0ms (6.6%)

sample2.5s (28.7%)

explain323.0ms (3.7%)

preprocess180.0ms (2.1%)

eval0.0ms (0%)

prune1.0ms (0%)

series82.0ms (1%)

rewrite208.0ms (2.4%)

eval28.0ms (0.3%)

prune19.0ms (0.2%)

series242.0ms (2.8%)

rewrite436.0ms (5.1%)

eval201.0ms (2.3%)

prune122.0ms (1.4%)

series83.0ms (1%)

rewrite227.0ms (2.6%)

eval73.0ms (0.9%)

prune92.0ms (1.1%)

series52.0ms (0.6%)

rewrite268.0ms (3.1%)

eval68.0ms (0.8%)

prune95.0ms (1.1%)

regimes169.0ms (2%)

regimes37.0ms (0.4%)

regimes39.0ms (0.5%)

regimes37.0ms (0.4%)

regimes55.0ms (0.6%)

regimes34.0ms (0.4%)

regimes55.0ms (0.6%)

regimes29.0ms (0.3%)

regimes54.0ms (0.6%)

regimes75.0ms (0.9%)

regimes28.0ms (0.3%)

regimes29.0ms (0.3%)

regimes156.0ms (1.8%)

regimes37.0ms (0.4%)

regimes29.0ms (0.3%)

regimes63.0ms (0.7%)

regimes32.0ms (0.4%)

regimes43.0ms (0.5%)

regimes47.0ms (0.5%)

regimes7.0ms (0.1%)

regimes6.0ms (0.1%)

regimes12.0ms (0.1%)

regimes52.0ms (0.6%)

regimes5.0ms (0.1%)

bsearch87.0ms (1%)

bsearch67.0ms (0.8%)

bsearch4.0ms (0%)

bsearch61.0ms (0.7%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch7.0ms (0.1%)

bsearch35.0ms (0.4%)

bsearch107.0ms (1.2%)

bsearch23.0ms (0.3%)

bsearch33.0ms (0.4%)

bsearch64.0ms (0.7%)

bsearch75.0ms (0.9%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch86.0ms (1%)

bsearch23.0ms (0.3%)

bsearch16.0ms (0.2%)

bsearch41.0ms (0.5%)

bsearch83.0ms (1%)

bsearch1.0ms (0%)

simplify79.0ms (0.9%)

derivations568.0ms (6.6%)

preprocess167.0ms (1.9%)

end0.0ms (0%)

Profiling