Metrics for jeff quadratic root 2

start0.0ms (0%)

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

analyze220.0ms (3.9%)

Memory

43.7MiB live, 315.8MiB allocated; 58ms 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
25%	25%	74.9%	0.1%	0%	0%	0%	4
25%	25%	74.9%	0.1%	0%	0%	0%	5
34.4%	34.3%	65.5%	0.1%	0%	0%	0%	6
36.7%	34.3%	59.3%	0.1%	0%	6.2%	0%	7
40.8%	38.2%	55.4%	0.1%	0%	6.2%	0%	8
51.3%	46.8%	44.5%	0.1%	0%	8.6%	0%	9
56.5%	49%	37.6%	0.1%	0%	13.3%	0%	10
61.9%	53.1%	32.7%	0.1%	0%	14%	0%	11
69.7%	58.2%	25.3%	0.1%	0%	16.4%	0%	12

Compiler

Compiled 40 to 22 computations (45% saved)

sample1.4s (24.7%)

Memory

-36.1MiB live, 1 835.9MiB allocated; 352ms collecting garbage

Samples

831.0ms	8 256×	0	valid
93.0ms	1 014×	0	invalid

Precisions

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

ival-mult: 314.0ms (50% of total)

ival-sub: 74.0ms (11.8% of total)

ival-neg: 72.0ms (11.5% of total)

ival-div: 65.0ms (10.4% of total)

ival-sqrt: 58.0ms (9.2% of total)

ival-add: 21.0ms (3.3% of total)

exact: 12.0ms (1.9% of total)

ival-if: 4.0ms (0.6% of total)

adjust: 3.0ms (0.5% of total)

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

ival->=: 1.0ms (0.2% of total)

Bogosity

explain375.0ms (6.6%)

Memory

53.0MiB live, 414.1MiB allocated; 92ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
103	0	-	1	(3.24424938748568e-176 -4.193672248846343e-157 2.7937641682773712e-282)	`(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))`
70	0	-	0	-	`(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))`
58	0	-	0	-	`(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))`
16	1	(-3.2466194149874685e-250 2132875230544412400.0 -2.5467272565131753e-305)	2	(1.2331990377176566e-228 4.854244634537611e+192 -5.648733918263758e+101)	`(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))`
14	0	-	0	-	`(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))`
5	0	-	0	-	`(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))`
0	0	-	0	-	`a`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) c)`
0	0	-	0	-	`(*.f64 b b)`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) a)`
0	0	-	0	-	`c`
0	0	-	0	-	`(*.f64 #s(literal 4 binary64) a)`
0	0	-	0	-	`(neg.f64 b)`
0	0	-	0	-	`(>=.f64 b #s(literal 0 binary64))`
0	0	-	0	-	`(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))`
0	0	-	0	-	`#s(literal 4 binary64)`
0	0	-	0	-	`#s(literal 0 binary64)`
0	0	-	0	-	`(.f64 (.f64 #s(literal 4 binary64) a) c)`
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`b`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))`	oflow-rescue	97	0
↳	`(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))`	overflow	97
↳	`(.f64 (.f64 #s(literal 4 binary64) a) c)`	overflow	21
↳	`(*.f64 b b)`	overflow	87
`+.f64`	`(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))`	cancellation	70	0
`-.f64`	`(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))`	cancellation	58	0
`/.f64`	`(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))`	u/n	15	0
↳	`(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))`	underflow	5
↳	`(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))`	underflow	29
↳	`(.f64 (.f64 #s(literal 4 binary64) a) c)`	underflow	43
↳	`(*.f64 b b)`	underflow	43
`/.f64`	`(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))`	n/u	14	0
↳	`(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))`	underflow	28
↳	`(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))`	underflow	5
↳	`(.f64 (.f64 #s(literal 4 binary64) a) c)`	underflow	43
↳	`(*.f64 b b)`	underflow	43
`sqrt.f64`	`(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))`	uflow-rescue	5	0
↳	`(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))`	underflow	5
↳	`(.f64 (.f64 #s(literal 4 binary64) a) c)`	underflow	43
↳	`(*.f64 b b)`	underflow	43
`-.f64`	`(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))`	nan-rescue	5	0
↳	`(*.f64 b b)`	overflow	87
↳	`(.f64 (.f64 #s(literal 4 binary64) a) c)`	overflow	21

Confusion

	Predicted +	Predicted -
+	76	0
-	115	65

Precision

0.39790575916230364

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	76	0	0
-	115	0	65

Precision?

0.39790575916230364

Recall?

1.0

Freqs

test

number	freq
0	65
1	123
2	63
3	5

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

97.0ms	166×	2	valid
40.0ms	168×	1	valid
18.0ms	36×	3	valid
17.0ms	142×	0	valid

Compiler

Compiled 332 to 64 computations (80.7% saved)

Precisions

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

ival-div: 54.0ms (40.6% of total)

adjust: 25.0ms (18.8% of total)

ival-mult: 20.0ms (15% of total)

ival-sub: 10.0ms (7.5% of total)

ival-sqrt: 9.0ms (6.8% of total)

ival-if: 5.0ms (3.8% of total)

ival-add: 5.0ms (3.8% of total)

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

ival->=: 1.0ms (0.8% of total)

exact: 1.0ms (0.8% of total)

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

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

preprocess206.0ms (3.6%)

Memory

-9.1MiB live, 89.3MiB allocated; 52ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	85	393
1	219	381
2	540	381
3	1092	379
4	2334	373
0	20	38
0	33	38
1	57	38
2	124	38
3	263	38
4	510	38
5	1589	38
6	7914	38
0	8056	38

Stop Event

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

Calls

Call 1

Inputs

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)))

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 c #s(literal 2 binary64)) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))))) (/.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)) (*.f64 a #s(literal 2 binary64))))

Compiler

Compiled 38 to 20 computations (47.4% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	72.0%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))

Status

Accuracy

Program

▶

72.0%

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)))

Compiler

Compiled 38 to 20 computations (47.4% saved)

series49.0ms (0.9%)

Memory

-11.7MiB live, 36.4MiB allocated; 5ms collecting garbage

Counts

20 → 172

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(neg.f64 b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(*.f64 b b)
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(*.f64 #s(literal 2 binary64) a)

Outputs
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))

Calls

9 calls:

Time	Variable		Point	Expression
8.0ms	b	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))
7.0ms	a	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))
6.0ms	a	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))
5.0ms	c	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))
4.0ms	b	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))

rewrite213.0ms (3.7%)

Memory

-3.8MiB live, 134.7MiB allocated; 18ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1090	8107
0	1112	7315
1	6421	7210
0	8671	7096

Stop Event

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

Counts

192 → 235

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(neg.f64 b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(*.f64 b b)
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(*.f64 #s(literal 2 binary64) a)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 c #s(literal 2 binary64)) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) (/.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)) (.f64 a #s(literal 2 binary64))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(.f64 (/.f64 c (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))))
(/.f64 (neg.f64 (.f64 c #s(literal 2 binary64))) (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))))
(/.f64 (.f64 c #s(literal 2 binary64)) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))))
(+.f64 (/.f64 c (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) (/.f64 c (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))))
(*.f64 c #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) c)
(+.f64 c c)
#s(literal 2 binary64)
c
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 3/2 binary64))) (+.f64 (.f64 b b) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
(.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))
(pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) #s(literal 1 binary64))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c))) (+.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (.f64 #s(literal -4 binary64) (.f64 a c))) (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (.f64 b b)))
(/.f64 (-.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 #s(literal 64 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64)))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))))
(/.f64 (+.f64 (.f64 #s(literal -64 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.f64 (.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (.f64 #s(literal -4 binary64) (.f64 a c))) (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)))))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(+.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(+.f64 (.f64 b b) (.f64 #s(literal -4 binary64) (*.f64 a c)))
(*.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 (*.f64 b b) #s(literal 1 binary64))
(pow.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))))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(.f64 (.f64 a c) #s(literal 4 binary64))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(.f64 #s(literal 4 binary64) (.f64 a c))
(.f64 c (.f64 a #s(literal 4 binary64)))
(*.f64 a #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
(/.f64 (/.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))) (neg.f64 (.f64 a #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)) (.f64 a #s(literal 2 binary64)))
(+.f64 (/.f64 (neg.f64 b) (.f64 a #s(literal 2 binary64))) (/.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (*.f64 a #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 b b)) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)))
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 3/2 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 3/2 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)))))
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (.f64 #s(literal 1 binary64) b))
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))))
(*.f64 a #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 c) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 (+.f64 (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (*.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64)))) a) (/.f64 (neg.f64 c) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) a) (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (/.f64 (neg.f64 c) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 (-.f64 (.f64 (.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) #s(literal 2 binary64)) (.f64 (/.f64 c b) #s(literal -2 binary64))) a) (*.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 (-.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64))) (.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) a) (.f64 (/.f64 c b) #s(literal -2 binary64))) a) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 b (.f64 (.f64 a (/.f64 c b)) #s(literal 2 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) a) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64))) (.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) a) (.f64 (/.f64 c b) #s(literal -2 binary64))) a) b))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
#s(approx (* (* 4 a) c) (.f64 (.f64 a #s(literal 4 binary64)) c))
#s(approx (* 4 a) (*.f64 a #s(literal 4 binary64)))
#s(approx a a)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 c) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (neg.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 (+.f64 (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (*.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64)))) a) (/.f64 (neg.f64 c) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b)))) a) (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (/.f64 (neg.f64 c) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (.f64 a (/.f64 c b)) #s(literal -2 binary64)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64))) (.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) a) (.f64 (/.f64 c b) #s(literal -2 binary64))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b)))) a) (.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) a) (.f64 (/.f64 c b) #s(literal -2 binary64))) a))
#s(approx (* 2 a) (*.f64 a #s(literal 2 binary64)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (.f64 (.f64 (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (.f64 a a)))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 a c))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (neg.f64 (.f64 (.f64 b (/.f64 (.f64 (.f64 (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 a c)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (.f64 (.f64 (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (*.f64 a a))))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (/.f64 (neg.f64 b) a) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64))) #s(literal 1/8 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/4 binary64))) (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 7 binary64))) #s(literal -1/2 binary64))) #s(literal 1/16 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64))))) a))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c)) a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 (/.f64 b a) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (+.f64 (.f64 (/.f64 b a) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64))))) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64)))) (.f64 (/.f64 b a) #s(literal -1/2 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 (neg.f64 b) a)) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (-.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (-.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/16 binary64)) a) #s(literal -2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 (sqrt.f64 (/.f64 a c)) b) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/16 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (.f64 #s(literal 1/32 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 b #s(literal 3 binary64)) c)))) a) #s(literal -2 binary64)) (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/16 binary64)))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 (-.f64 (/.f64 b a) (.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) b) a)) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)))) a)) b) a)) (.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64))) #s(literal -2 binary64)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64))) #s(literal -1/64 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64)))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 6 binary64))) (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 7 binary64))) #s(literal -1/2 binary64))) #s(literal 1/512 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64))) #s(literal -1/64 binary64))) a)))
#s(approx (- (* b b) (* (* 4 a) c)) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)) a)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/128 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)))) a)) (*.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64))) #s(literal -2 binary64)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 (+.f64 (.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b a)) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))) a)))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64))) (*.f64 (/.f64 (/.f64 b a) #s(literal -4 binary64)) #s(literal -2 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal -4 binary64) a)) (.f64 (.f64 #s(literal 2 binary64) b) (.f64 (.f64 (pow.f64 #s(literal -4 binary64) #s(literal -3/2 binary64)) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) #s(literal -1/2 binary64)))) b) (.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) b) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 a a) c) #s(literal 16 binary64))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 #s(literal -4 binary64) #s(literal -3/2 binary64)) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))) (pow.f64 (.f64 a c) #s(literal -1/2 binary64)))))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 #s(literal -4 binary64) #s(literal -3/2 binary64)) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) #s(literal -1/2 binary64)))) b) (/.f64 #s(literal 2 binary64) (.f64 #s(literal -4 binary64) a))) b) (.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (neg.f64 b) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64)) b) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) b) #s(literal 1 binary64)) b) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (neg b) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) (.f64 b b)) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (.f64 a c) #s(literal -5 binary64)))) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 5/4 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (pow.f64 #s(literal -4 binary64) #s(literal -3/2 binary64)))) (.f64 b b)) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) (.f64 b b)) (sqrt.f64 (.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
#s(approx (* b b) (*.f64 b b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) (/.f64 #s(literal 1/2 binary64) a)) b) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal -1/16 binary64)) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64))))) b) (/.f64 #s(literal 1/2 binary64) a)) b) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c))) (neg.f64 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64)) b) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) b) #s(literal 1 binary64)) b) (sqrt.f64 (.f64 #s(literal -4 binary64) (.f64 a c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal -2 binary64)) (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (+.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))) #s(literal -5/2 binary64)) (pow.f64 b #s(literal 6 binary64))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal -2 binary64))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 a c)) (.f64 b b)) #s(literal 2 binary64)) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a c)) (.f64 b b)))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b)))))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a c)) (.f64 b b))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 1 binary64)) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b)))))) b))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (.f64 b b)) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal -2 binary64)) (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (+.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 (pow.f64 b #s(literal 6 binary64)) a))) (.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal -2 binary64))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (*.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 c #s(literal 2 binary64)) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) (.f64 (/.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)) a) #s(literal 1/2 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (neg.f64 b) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 c c) a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (neg.f64 c) (.f64 b b))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (neg.f64 b) (+.f64 (.f64 (/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 (.f64 a a) c)) (neg.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))))) (neg.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 c c) a)) c) a))) (pow.f64 b #s(literal 6 binary64))) #s(literal -2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 c c) a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (neg.f64 c) (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (.f64 a (/.f64 c b)) #s(literal -2 binary64)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (.f64 a a) (ratio-of-squares.f64 c b)) #s(literal 2 binary64)) (.f64 (*.f64 a c) #s(literal -2 binary64))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))))) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a c)) (.f64 b b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 b) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 b) (+.f64 (+.f64 (neg.f64 (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (.f64 b b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 b) (+.f64 (.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) #s(literal -2 binary64)) (+.f64 (+.f64 (neg.f64 (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (*.f64 b b))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a c)) (.f64 b b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 2 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 b) (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (-.f64 (neg.f64 (.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (-.f64 (.f64 (+.f64 (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 a a) c)) (pow.f64 b #s(literal 5 binary64)))) c) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (-.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 c #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))) (*.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64))) #s(literal -2 binary64))) c) (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))))) c) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (* 2 c) (*.f64 c #s(literal 2 binary64)))
#s(approx c c)
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) c)) (pow.f64 b #s(literal 3 binary64))) (.f64 (/.f64 a b) #s(literal -2 binary64))) c) (.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 (-.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) c) (.f64 (/.f64 a b) #s(literal -2 binary64))) c) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64)))))) c) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) c) (.f64 (/.f64 a b) #s(literal -2 binary64))) c) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (-.f64 (neg.f64 (.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (-.f64 (.f64 (+.f64 (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 a a) c)) (pow.f64 b #s(literal 5 binary64)))) c) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (-.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64))) #s(literal -2 binary64)) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b)))) c) (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))))) c) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64)))))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) c) (.f64 (/.f64 a b) #s(literal -2 binary64))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 c (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b)))) c) (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64))) c) (.f64 (/.f64 a b) #s(literal -2 binary64))) c))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (+.f64 (neg.f64 (/.f64 (.f64 (.f64 (pow.f64 (/.f64 c a) #s(literal 3/2 binary64)) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal 1 binary64)) (.f64 c c))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) (.f64 (/.f64 (/.f64 b a) #s(literal -4 binary64)) #s(literal -2 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64))) (neg.f64 (.f64 (.f64 b (/.f64 (.f64 (.f64 (pow.f64 (/.f64 c a) #s(literal 3/2 binary64)) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal 1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 c a))))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64)) (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal 1 binary64)) (.f64 (/.f64 (/.f64 b a) #s(literal -4 binary64)) #s(literal -2 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))) c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal 1/8 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 7 binary64)) (pow.f64 a #s(literal 5 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/4 binary64)))) #s(literal 1/16 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))) (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal -1/8 binary64))) c))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (-.f64 (/.f64 (.f64 b b) c) (*.f64 a #s(literal 4 binary64))) c))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal -4 binary64))) (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64))) c))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal -4 binary64)))) c))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal -1/16 binary64) (sqrt.f64 (pow.f64 (.f64 a c) #s(literal -5 binary64)))) (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal -4 binary64))))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (-.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 (.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))) (-.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))) c))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (.f64 (/.f64 b a) #s(literal -1/2 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) #s(literal -1/8 binary64)) (.f64 (.f64 b (/.f64 c a)) #s(literal -1/2 binary64))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (.f64 (.f64 b (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 (pow.f64 (/.f64 c a) #s(literal 3/2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) #s(literal -1/8 binary64)))) (-.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) c)) (.f64 a a)) (.f64 (.f64 (pow.f64 (/.f64 c a) #s(literal 3/2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) #s(literal -1/8 binary64)))) c)) (.f64 (.f64 b (/.f64 c a)) #s(literal -1/2 binary64))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (/.f64 b c) (.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) b) c)) (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)))) c)) b) c)) (.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 c) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 c) (+.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 3 binary64))) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) #s(literal -1/64 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 c) (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 7 binary64)) (pow.f64 a #s(literal 5 binary64))) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 6 binary64)))) #s(literal 1/512 binary64)) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 (pow.f64 (.f64 (pow.f64 c #s(literal 5 binary64)) (pow.f64 a #s(literal 3 binary64))) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) #s(literal -1/64 binary64)))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 c) (+.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (/.f64 (/.f64 b a) c) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) (.f64 (/.f64 b a) #s(literal -1/2 binary64))) c)) (.f64 (pow.f64 (*.f64 a c) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (.f64 (pow.f64 (.f64 a c) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 a c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 b b)))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))

eval272.0ms (4.8%)

Memory

23.8MiB live, 256.0MiB allocated; 39ms collecting garbage

Samples

122.0ms	3 112×	0	invalid
53.0ms	984×	0	valid

Compiler

Compiled 18 684 to 1 869 computations (90% saved)

Precisions

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

ival-mult: 59.0ms (69.3% of total)

ival-div: 14.0ms (16.4% of total)

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

ival-true: 3.0ms (3.5% of total)

ival-sqrt: 2.0ms (2.3% of total)

ival-assert: 2.0ms (2.3% of total)

adjust: 1.0ms (1.2% of total)

exact: 0.0ms (0% of total)

prune45.0ms (0.8%)

Memory

-5.3MiB live, 40.1MiB allocated; 6ms collecting garbage

Pruning

13 alts after pruning (13 fresh and 0 done)

	Pruned	Kept	Total
New	315	13	328
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	316	13	329

Accuracy

100.0%

Counts

329 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.8%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
	59.2%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 3/2 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))))) (.f64 #s(literal 2 binary64) a)))
▶	66.1%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) a)))
▶	72.9%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	49.6%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)))) (.f64 #s(literal 2 binary64) a)))
▶	51.0%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
	44.5%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64))))
	72.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
	44.6%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) c))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
▶	72.7%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
	37.2%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (.f64 (/.f64 b a) #s(literal -1/2 binary64)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
	44.7%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)))
▶	72.0%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))

Compiler

Compiled 1 392 to 868 computations (37.6% saved)

series78.0ms (1.4%)

Memory

27.7MiB live, 73.6MiB allocated; 3ms collecting garbage

Counts

62 → 534

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(neg.f64 b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(*.f64 b b)
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
(/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
(*.f64 #s(literal 2 binary64) a)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))
(*.f64 #s(literal -2 binary64) c)
#s(literal -2 binary64)
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
(.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a)
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
#s(literal 1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))
(-.f64 (*.f64 a (/.f64 c b)) b)
(*.f64 a (/.f64 c b))
(/.f64 c b)
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))
(neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(/.f64 c a)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 b a)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))))
(.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))
#s(literal 1 binary64)

Outputs
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -2 (/ (* a c) b)) (* 2 b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* a 4) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* a 4) #s(hole binary64 (* 4 a)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ c b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (- (/ (* a c) b) b)))
#s(approx (* a (/ c b)) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ c a) -1) #s(hole binary64 (* -1 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 b))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ 1 b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* 2 (/ (* a c) (pow b 3))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* a (+ (* -1/2 (* a (* b (+ (* -16 (/ (pow c 2) (pow b 6))) (* 4 (/ (pow c 2) (pow b 6))))))) (* 2 (/ c (pow b 3))))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* a (+ (* 2 (/ c (pow b 3))) (* a (+ (* -1/2 (* a (* b (+ (* -64 (/ (pow c 3) (pow b 8))) (* -2 (/ (* c (+ (* -16 (/ (pow c 2) (pow b 6))) (* 4 (/ (pow c 2) (pow b 6))))) (pow b 2))))))) (* -1/2 (* b (+ (* -16 (/ (pow c 2) (pow b 6))) (* 4 (/ (pow c 2) (pow b 6)))))))))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (pow b 2)))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -4))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (/ c b)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* (sqrt (/ 1 (* a c))) (sqrt -1/4))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4)))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c (pow a 7))) (/ (+ (* 1/1024 (/ (* a (pow b 4)) (* (pow c 3) (pow (sqrt -1/4) 2)))) (* 1/256 (/ (pow b 6) (pow c 4)))) (sqrt -1/4)))) (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* -4 (* a c))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ b a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a))) a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ c b)) (/ b a))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (* (sqrt (/ a (pow c 5))) (* (pow b 4) (sqrt -1)))) (* (sqrt (/ c a)) (* (sqrt -1) (+ (* -1/256 (/ (* a (pow b 4)) (pow c 3))) (* 1/256 (/ (pow b 6) (pow c 4))))))) (pow a 3))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (+ (* -1 (pow b 2)) (* a c)) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* (sqrt (/ 1 (* a c))) (sqrt -1/4)) (* (pow b 2) (+ (* -1/2 (* (sqrt (* a c)) (/ (* (pow b 2) (+ (* 1/1024 (/ 1 (* (pow a 3) (* (pow c 3) (pow (sqrt -1/4) 2))))) (* 1/64 (/ 1 (* (pow a 3) (pow c 3)))))) (sqrt -1/4)))) (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (sqrt -1/4)))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* (sqrt (/ 1 (* a c))) (sqrt -1/4)) (* (pow b 2) (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (sqrt -1/4)))) (* (pow b 2) (+ (* -1/2 (* (sqrt (* a c)) (/ (* (pow b 2) (+ (* 1/32 (/ (+ (* 1/1024 (/ 1 (* (pow a 3) (* (pow c 3) (pow (sqrt -1/4) 2))))) (* 1/64 (/ 1 (* (pow a 3) (pow c 3))))) (* a (* c (pow (sqrt -1/4) 2))))) (* 1/256 (/ 1 (* (pow a 4) (pow c 4)))))) (sqrt -1/4)))) (* -1/2 (* (sqrt (* a c)) (/ (+ (* 1/1024 (/ 1 (* (pow a 3) (* (pow c 3) (pow (sqrt -1/4) 2))))) (* 1/64 (/ 1 (* (pow a 3) (pow c 3))))) (sqrt -1/4)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (+ (* -2 (/ (* a (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ (+ 1 (* 2 (/ (* a c) (pow b 2)))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2))))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -64 (* (pow a 3) (pow c 3))) (* -2 (* a (* c (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))))))) (pow b 6))) (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2)))))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ b a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ -1 b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* 2 (/ (* a c) (pow b 2)))) b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2))))) b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -64 (* (pow a 3) (pow c 3))) (* -2 (* a (* c (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))))))) (pow b 6))) (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2)))))) b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* -2 c) #s(hole binary64 (* -2 c)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 5))) (* -2 (/ a (pow b 3))))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -2 (/ a (pow b 3))) (* c (+ (* -4 (/ (pow a 2) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (* 2 (/ 1 b))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* c (+ (* -1/2 (* b (* c (+ (* -16 (/ (pow a 2) (pow b 6))) (* 4 (/ (pow a 2) (pow b 6))))))) (* 2 (/ a (pow b 3))))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* c (+ (* 2 (/ a (pow b 3))) (* c (+ (* -1/2 (* b (* c (+ (* -64 (/ (pow a 3) (pow b 8))) (* -2 (/ (* a (+ (* -16 (/ (pow a 2) (pow b 6))) (* 4 (/ (pow a 2) (pow b 6))))) (pow b 2))))))) (* -1/2 (* b (+ (* -16 (/ (pow a 2) (pow b 6))) (* 4 (/ (pow a 2) (pow b 6)))))))))) (/ 1 b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (/ a b)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ a (pow c 7))) (/ (+ (* 1/1024 (/ (* (pow b 4) c) (* (pow a 3) (pow (sqrt -1/4) 2)))) (* 1/256 (/ (pow b 6) (pow a 4)))) (sqrt -1/4)))) (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (/ b (* a c)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ a b)) (/ b c))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (* (sqrt (/ c (pow a 5))) (* (pow b 4) (sqrt -1)))) (* (sqrt (/ a c)) (* (sqrt -1) (+ (* -1/256 (/ (* (pow b 4) c) (pow a 3))) (* 1/256 (/ (pow b 6) (pow a 4))))))) (pow c 3))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))

Calls

9 calls:

Time	Variable		Point	Expression
10.0ms	b	@	0	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) -1 (* 1/2 (/ b a)) (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (pow (- (* b b) (* (* a 4) c)) -1/2) -1/2 (pow (- (* b b) (* (* a 4) c)) 1) 1)
9.0ms	b	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) -1 (* 1/2 (/ b a)) (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (pow (- (* b b) (* (* a 4) c)) -1/2) -1/2 (pow (- (* b b) (* (* a 4) c)) 1) 1)
7.0ms	a	@	0	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) -1 (* 1/2 (/ b a)) (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (pow (- (* b b) (* (* a 4) c)) -1/2) -1/2 (pow (- (* b b) (* (* a 4) c)) 1) 1)
7.0ms	c	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) -1 (* 1/2 (/ b a)) (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (pow (- (* b b) (* (* a 4) c)) -1/2) -1/2 (pow (- (* b b) (* (* a 4) c)) 1) 1)
7.0ms	c	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 a (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) -1 (* 1/2 (/ b a)) (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (pow (- (* b b) (* (* a 4) c)) -1/2) -1/2 (pow (- (* b b) (* (* a 4) c)) 1) 1)

rewrite214.0ms (3.8%)

Memory

7.9MiB live, 199.8MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1950	26153
0	2038	23036
0	8049	22797

Stop Event

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

Counts

596 → 660

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(neg.f64 b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(*.f64 b b)
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
(/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
(*.f64 #s(literal 2 binary64) a)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))
(*.f64 #s(literal -2 binary64) c)
#s(literal -2 binary64)
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
(.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a)
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
#s(literal 1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))
(-.f64 (*.f64 a (/.f64 c b)) b)
(*.f64 a (/.f64 c b))
(/.f64 c b)
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))
(neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(/.f64 c a)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 b a)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))))
(.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -2 (/ (* a c) b)) (* 2 b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* a 4) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* a 4) #s(hole binary64 (* 4 a)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ c b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (- (/ (* a c) b) b)))
#s(approx (* a (/ c b)) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ c a) -1) #s(hole binary64 (* -1 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 b))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ 1 b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* 2 (/ (* a c) (pow b 3))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* a (+ (* -1/2 (* a (* b (+ (* -16 (/ (pow c 2) (pow b 6))) (* 4 (/ (pow c 2) (pow b 6))))))) (* 2 (/ c (pow b 3))))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* a (+ (* 2 (/ c (pow b 3))) (* a (+ (* -1/2 (* a (* b (+ (* -64 (/ (pow c 3) (pow b 8))) (* -2 (/ (* c (+ (* -16 (/ (pow c 2) (pow b 6))) (* 4 (/ (pow c 2) (pow b 6))))) (pow b 2))))))) (* -1/2 (* b (+ (* -16 (/ (pow c 2) (pow b 6))) (* 4 (/ (pow c 2) (pow b 6)))))))))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (pow b 2)))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -4))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (/ c b)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* (sqrt (/ 1 (* a c))) (sqrt -1/4))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4)))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c (pow a 7))) (/ (+ (* 1/1024 (/ (* a (pow b 4)) (* (pow c 3) (pow (sqrt -1/4) 2)))) (* 1/256 (/ (pow b 6) (pow c 4)))) (sqrt -1/4)))) (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* -4 (* a c))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ b a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a))) a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ c b)) (/ b a))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (* (sqrt (/ a (pow c 5))) (* (pow b 4) (sqrt -1)))) (* (sqrt (/ c a)) (* (sqrt -1) (+ (* -1/256 (/ (* a (pow b 4)) (pow c 3))) (* 1/256 (/ (pow b 6) (pow c 4))))))) (pow a 3))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (+ (* -1 (pow b 2)) (* a c)) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* (sqrt (/ 1 (* a c))) (sqrt -1/4)) (* (pow b 2) (+ (* -1/2 (* (sqrt (* a c)) (/ (* (pow b 2) (+ (* 1/1024 (/ 1 (* (pow a 3) (* (pow c 3) (pow (sqrt -1/4) 2))))) (* 1/64 (/ 1 (* (pow a 3) (pow c 3)))))) (sqrt -1/4)))) (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (sqrt -1/4)))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* (sqrt (/ 1 (* a c))) (sqrt -1/4)) (* (pow b 2) (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (sqrt -1/4)))) (* (pow b 2) (+ (* -1/2 (* (sqrt (* a c)) (/ (* (pow b 2) (+ (* 1/32 (/ (+ (* 1/1024 (/ 1 (* (pow a 3) (* (pow c 3) (pow (sqrt -1/4) 2))))) (* 1/64 (/ 1 (* (pow a 3) (pow c 3))))) (* a (* c (pow (sqrt -1/4) 2))))) (* 1/256 (/ 1 (* (pow a 4) (pow c 4)))))) (sqrt -1/4)))) (* -1/2 (* (sqrt (* a c)) (/ (+ (* 1/1024 (/ 1 (* (pow a 3) (* (pow c 3) (pow (sqrt -1/4) 2))))) (* 1/64 (/ 1 (* (pow a 3) (pow c 3))))) (sqrt -1/4)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (+ (* -2 (/ (* a (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ (+ 1 (* 2 (/ (* a c) (pow b 2)))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2))))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ (+ 1 (+ (* -1/2 (/ (+ (* -64 (* (pow a 3) (pow c 3))) (* -2 (* a (* c (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))))))) (pow b 6))) (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2)))))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ b a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 b)))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (/ -1 b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (* 2 (/ (* a c) (pow b 2)))) b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2))))) b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (* -1 (/ (+ 1 (+ (* -1/2 (/ (+ (* -64 (* (pow a 3) (pow c 3))) (* -2 (* a (* c (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))))))) (pow b 6))) (+ (* -1/2 (/ (+ (* -16 (* (pow a 2) (pow c 2))) (* 4 (* (pow a 2) (pow c 2)))) (pow b 4))) (* 2 (/ (* a c) (pow b 2)))))) b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* -2 c) #s(hole binary64 (* -2 c)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 5))) (* -2 (/ a (pow b 3))))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -2 (/ a (pow b 3))) (* c (+ (* -4 (/ (pow a 2) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (* 2 (/ 1 b))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* c (+ (* -1/2 (* b (* c (+ (* -16 (/ (pow a 2) (pow b 6))) (* 4 (/ (pow a 2) (pow b 6))))))) (* 2 (/ a (pow b 3))))) (/ 1 b))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* c (+ (* 2 (/ a (pow b 3))) (* c (+ (* -1/2 (* b (* c (+ (* -64 (/ (pow a 3) (pow b 8))) (* -2 (/ (* a (+ (* -16 (/ (pow a 2) (pow b 6))) (* 4 (/ (pow a 2) (pow b 6))))) (pow b 2))))))) (* -1/2 (* b (+ (* -16 (/ (pow a 2) (pow b 6))) (* 4 (/ (pow a 2) (pow b 6)))))))))) (/ 1 b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (/ a b)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ a (pow c 7))) (/ (+ (* 1/1024 (/ (* (pow b 4) c) (* (pow a 3) (pow (sqrt -1/4) 2)))) (* 1/256 (/ (pow b 6) (pow a 4)))) (sqrt -1/4)))) (+ (* -1/32 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -1/4)))) (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (sqrt -1/4)))) (* (sqrt (/ 1 (* a c))) (sqrt -1/4)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (/ b (* a c)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ a b)) (/ b c))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (* (sqrt (/ c (pow a 5))) (* (pow b 4) (sqrt -1)))) (* (sqrt (/ a c)) (* (sqrt -1) (+ (* -1/256 (/ (* (pow b 4) c) (pow a 3))) (* 1/256 (/ (pow b 6) (pow a 4))))))) (pow c 3))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c)) (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))))
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 c c)
#s(literal 2 binary64)
c
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) #s(literal 3 binary64))) (+.f64 (.f64 b b) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(neg.f64 b)
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 #s(literal 4 binary64) a) c) (.f64 (.f64 #s(literal 4 binary64) a) c))) (+.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal 4 binary64) a) c) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) a) c) (.f64 (.f64 #s(literal 4 binary64) a) c)) (.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(*.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 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
(/.f64 (neg.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a))
(+.f64 (/.f64 (neg.f64 b) (.f64 #s(literal 2 binary64) a)) (/.f64 #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b)) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (.f64 b b) (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))))))
(+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (.f64 #s(literal -2 binary64) c)) (neg.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)))
(/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))
(*.f64 #s(literal -2 binary64) c)
#s(literal -2 binary64)
(/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c))) (+.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 1 binary64)))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
(.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)) (neg.f64 a))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a)
(-.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) a) (/.f64 b a))
(/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (+.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
#s(literal 1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c)) (neg.f64 #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))
(+.f64 (-.f64 (.f64 a (/.f64 c b)) b) (-.f64 (.f64 a (/.f64 c b)) b))
(/.f64 (-.f64 (.f64 (.f64 a (/.f64 c b)) (.f64 a (/.f64 c b))) (.f64 b b)) (+.f64 (*.f64 a (/.f64 c b)) b))
(/.f64 (-.f64 (pow.f64 (.f64 a (/.f64 c b)) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (.f64 (.f64 a (/.f64 c b)) (.f64 a (/.f64 c b))) (+.f64 (.f64 b b) (.f64 (*.f64 a (/.f64 c b)) b))))
(-.f64 (*.f64 a (/.f64 c b)) b)
(*.f64 a (/.f64 c b))
(/.f64 (neg.f64 c) (neg.f64 b))
(/.f64 c b)
(/.f64 (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (neg.f64 (.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (/.f64 (neg.f64 b) (.f64 #s(literal 2 binary64) a)) (/.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(/.f64 (-.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))) (+.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) (.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))))
(-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))
(+.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 b a)))
(neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(*.f64 (sqrt.f64 (/.f64 c a)) (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(/.f64 (neg.f64 c) (neg.f64 a))
(/.f64 c a)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))))) (neg.f64 (.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (/.f64 (neg.f64 b) (.f64 #s(literal 2 binary64) a)) (/.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (.f64 b b) (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))))))
(-.f64 (neg.f64 b) (.f64 (neg.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64))) (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))))
(.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/4 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal -1/4 binary64)))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
(.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c))) (+.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 1 binary64)))
#s(literal 1 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) b) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 a (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (/.f64 (.f64 a c) b) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 a (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 b (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)))
#s(approx (* (* 4 a) c) (.f64 #s(literal 4 binary64) (.f64 a c)))
#s(approx (* 4 a) (*.f64 #s(literal 4 binary64) a))
#s(approx a a)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b)))))))))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) b) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 a (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (*.f64 #s(literal 2 binary64) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)) (*.f64 #s(literal -2 binary64) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) b)
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (-.f64 b (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (*.f64 b b))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (+.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)))
#s(approx (* (* a 4) c) (.f64 #s(literal 4 binary64) (.f64 a c)))
#s(approx (* a 4) (*.f64 #s(literal 4 binary64) a))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.f64 #s(literal -2 binary64) (/.f64 c b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b)))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (*.f64 #s(literal -2 binary64) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (-.f64 (.f64 #s(literal -2 binary64) b) (.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b))))
#s(approx (- (* a (/ c b)) b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- (* a (/ c b)) b) (-.f64 (/.f64 (*.f64 a c) b) b))
#s(approx (* a (/ c b)) (/.f64 (*.f64 a c) b))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) a)))
#s(approx (neg (sqrt (* (/ c a) -1))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (sqrt (* (/ c a) -1)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (* (/ c a) -1) (*.f64 #s(literal -1 binary64) (/.f64 c a)))
#s(approx (/ c a) (/.f64 c a))
#s(approx (* 1/2 (/ b a)) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))
#s(approx (/ b a) (/.f64 b a))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) b) a))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) b)
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (-.f64 b (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (pow.f64 b #s(literal -1 binary64)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 b (.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3 binary64))) #s(literal -12 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 c (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (.f64 a (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 a (.f64 b (-.f64 (.f64 #s(literal -64 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 c (.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3 binary64))) #s(literal -12 binary64))) (.f64 b b)))))) (.f64 b (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3 binary64))) #s(literal -12 binary64)))))))) (pow.f64 b #s(literal -1 binary64))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (*.f64 b b))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (+.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a))))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (.f64 a a)))))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (/.f64 b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a))))) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (.f64 a a)))))) a))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (/.f64 b a))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 b a)) (*.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (- (* a (/ c b)) b) (/.f64 (*.f64 a c) b))
#s(approx (- (* a (/ c b)) b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (/.f64 c b))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 a (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (/.f64 b a))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64)))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 7 binary64)))) (/.f64 (-.f64 (.f64 #s(literal 1/1024 binary64) (.f64 (/.f64 a (pow.f64 c #s(literal 3 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal -1/4 binary64)))) (.f64 #s(literal -1/256 binary64) (ratio-of-squares.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 c c)))) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)) a)) (.f64 #s(literal 1/2 binary64) (*.f64 a b))) a))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (/.f64 b a) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) b) a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)) a)) (.f64 #s(literal 1/2 binary64) (*.f64 a b))) a))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a))) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (-.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1 binary64) (/.f64 b a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (-.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 b (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (-.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) a))) a))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 b a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 #s(literal -2 binary64) (/.f64 b a))))))
#s(approx (- (* a (/ c b)) b) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 c b)) (/.f64 b a)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 b a)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 a (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/256 binary64) (/.f64 (.f64 a (pow.f64 b #s(literal 4 binary64))) (pow.f64 c #s(literal 3 binary64)))) (.f64 #s(literal -1/256 binary64) (ratio-of-squares.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 c c))))))) (pow.f64 a #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 2 binary64) (+.f64 (.f64 b (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (pow.f64 (*.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (*.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (*.f64 a c))))
#s(approx (* b b) (*.f64 b b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 2 binary64) (+.f64 (.f64 b (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))) (pow.f64 (*.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 b (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (+.f64 #s(literal 1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (*.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (*.f64 a c))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) (pow.f64 a #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* 2 (- (* a (/ c b)) b)) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 b b)) (.f64 #s(literal -2 binary64) (.f64 a c))) b))
#s(approx (- (* a (/ c b)) b) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b b)) (*.f64 a c)) b))
#s(approx (/ c b) (/.f64 c b))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (+.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (+.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (*.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/1024 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 c #s(literal 3 binary64)) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1/64 binary64) (pow.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 #s(literal 1/32 binary64) (.f64 (pown3/2s.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal -1 binary64))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 b b) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (sqrt.f64 (.f64 a c)) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/32 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/1024 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 c #s(literal 3 binary64)) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1/64 binary64) (pow.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) #s(literal -1 binary64)))) (.f64 a (.f64 c #s(literal -1/4 binary64))))) (.f64 #s(literal -1/256 binary64) (pow.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 (sqrt.f64 (.f64 a c)) (/.f64 (-.f64 (.f64 #s(literal 1/1024 binary64) (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (.f64 (pow.f64 c #s(literal 3 binary64)) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1/64 binary64) (pow.f64 (pow.f64 (*.f64 a c) #s(literal 3 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1/4 binary64)))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (*.f64 a c))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))) #s(literal -5/2 binary64)) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))) #s(literal 2 binary64))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (.f64 b b) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a c) (*.f64 b b))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (.f64 a (pow.f64 b #s(literal 6 binary64)))))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))) #s(literal -5/2 binary64)) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 (.f64 b b) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a c) (*.f64 b b))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (.f64 a (pow.f64 b #s(literal 6 binary64)))))))) b))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) c) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (.f64 a (pow.f64 b #s(literal 6 binary64)))))))) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))))) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))) #s(literal 2 binary64))))
#s(approx (- (* a (/ c b)) b) (.f64 b (-.f64 (/.f64 (.f64 a c) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) b))) (.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (.f64 a (pow.f64 b #s(literal 6 binary64)))))))) b))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))) b))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))))) b))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))) b))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) #s(literal -12 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (.f64 b b))))) b))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -64 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 a (.f64 c (.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) #s(literal -12 binary64)))))) (pow.f64 b #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) #s(literal -12 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (.f64 b b)))))) b))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 (.f64 b b) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a c) (*.f64 b b))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (.f64 #s(literal 1 binary64) b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 c c))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 c c)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (.f64 (.f64 a a) c))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 c c))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -2 binary64) (.f64 a c))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (*.f64 b b))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))))) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 #s(literal -1 binary64) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal -2 binary64) (/.f64 c (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (.f64 #s(literal -1 binary64) b)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (.f64 #s(literal 1 binary64) b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a (.f64 c c)) #s(literal -1/2 binary64)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (.f64 (.f64 a (.f64 c c)) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (.f64 (.f64 a a) c))) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a (.f64 c c)) #s(literal -1/2 binary64)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (*.f64 b b)))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (*.f64 b b))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (pow.f64 b #s(literal 6 binary64))))))) b)))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (*.f64 #s(literal -1 binary64) b))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.f64 #s(literal -2 binary64) (/.f64 b a)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal -1 binary64)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (- (* a (/ c b)) b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) b)) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (.f64 #s(literal 1 binary64) b)) a))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (*.f64 #s(literal -2 binary64) b))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (*.f64 #s(literal -1 binary64) b))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (/.f64 #s(literal -1 binary64) b))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (.f64 b b)))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) #s(literal -12 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (*.f64 b b))))) b)))
#s(approx (pow (- (* b b) (* (* a 4) c)) -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 -64 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 a (.f64 c (.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) #s(literal -12 binary64)))))) (pow.f64 b #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) #s(literal -12 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 c (.f64 (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64)))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* 2 c) (*.f64 #s(literal 2 binary64) c))
#s(approx c c)
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 c (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 c (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 c (.f64 (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64)))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* -2 c) (*.f64 #s(literal -2 binary64) c))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (*.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))))) (.f64 #s(literal 2 binary64) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 c (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b)))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 c (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64))) b)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (+.f64 b (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 b (.f64 c (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -12 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 c (+.f64 (.f64 #s(literal 2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 b (.f64 c (-.f64 (.f64 #s(literal -64 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a (.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -12 binary64))) (.f64 b b)))))) (.f64 b (*.f64 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -12 binary64)))))))) (pow.f64 b #s(literal -1 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (.f64 c c)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64)))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (/.f64 b c))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (.f64 c c)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64)))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b (.f64 a c))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b (.f64 a c))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (/.f64 b c))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 b c)) (*.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (- (* a (/ c b)) b) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (/.f64 a b))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 c (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 c (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (/.f64 b c))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a (pow.f64 c #s(literal 7 binary64)))) (/.f64 (-.f64 (.f64 #s(literal 1/1024 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) c) (.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1/4 binary64)))) (.f64 #s(literal -1/256 binary64) (ratio-of-squares.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 a a)))) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1/4 binary64)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))) c)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (/.f64 b c) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) b) c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))) c)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))) (/.f64 b (.f64 a c))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (/.f64 b a) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 #s(literal -2 binary64) (/.f64 b c))))))
#s(approx (- (* a (/ c b)) b) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (/.f64 b c)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (neg (sqrt (* (/ c a) -1))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (sqrt (* (/ c a) -1)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c)))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))))
#s(approx (* (pow (- (* b b) (* (* a 4) c)) -1/2) (pow (- (* b b) (* (* a 4) c)) 1)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) -1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/256 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) c) (pow.f64 a #s(literal 3 binary64)))) (.f64 #s(literal -1/256 binary64) (ratio-of-squares.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 a a))))))) (pow.f64 c #s(literal 3 binary64)))) (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (pow (- (* b b) (* (* a 4) c)) 1) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))

eval550.0ms (9.7%)

Memory

-77.8MiB live, 292.4MiB allocated; 119ms collecting garbage

Samples

223.0ms	3 866×	0	invalid
41.0ms	998×	0	valid

Compiler

Compiled 91 258 to 4 705 computations (94.8% saved)

Precisions

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

ival-mult: 84.0ms (71.5% of total)

ival-div: 20.0ms (17% of total)

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

ival-true: 3.0ms (2.6% of total)

ival-sqrt: 2.0ms (1.7% of total)

ival-assert: 2.0ms (1.7% of total)

adjust: 1.0ms (0.9% of total)

exact: 0.0ms (0% of total)

prune63.0ms (1.1%)

Memory

10.4MiB live, 58.3MiB allocated; 2ms collecting garbage

Pruning

16 alts after pruning (16 fresh and 0 done)

	Pruned	Kept	Total
New	1 189	15	1 204
Fresh	7	1	8
Picked	5	0	5
Done	0	0	0
Total	1 201	16	1 217

Accuracy

100.0%

Counts

1 217 → 16

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	51.0%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
	49.6%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)))) (.f64 #s(literal 2 binary64) a)))
	55.5%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))))
	62.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	53.2%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
▶	73.3%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
▶	62.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
	58.8%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c))))) (*.f64 #s(literal 2 binary64) a)))
	35.9%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	45.7%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
▶	35.9%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	39.8%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	44.9%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
▶	49.4%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))))
	44.5%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 #s(approx (/ (- (sqrt (- ( b b) (* (* a 4) c))) b) a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 1/2 binary64))))
	44.6%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))

Compiler

Compiled 1 936 to 1 092 computations (43.6% saved)

series79.0ms (1.4%)

Memory

-17.8MiB live, 37.3MiB allocated; 3ms collecting garbage

Counts

64 → 439

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))
(neg.f64 b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
(/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
(*.f64 #s(literal 2 binary64) a)
a
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
#s(literal -1 binary64)
(/.f64 b a)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))
(-.f64 (*.f64 a (/.f64 c b)) b)
(*.f64 a (/.f64 c b))
(/.f64 c b)
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 b b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))
(+.f64 c c)
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))
(neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(/.f64 c a)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
#s(literal 1/2 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))
(*.f64 #s(literal -2 binary64) c)
#s(literal -2 binary64)
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
(.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))
(/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)) a)
(/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b))

Outputs
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx a #s(hole binary64 a))
#s(approx (* -1 (/ b a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (- (/ (* a c) b) b)))
#s(approx (* a (/ c b)) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ c a) -1) #s(hole binary64 (* -1 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -2 (/ (* a c) b)) (* 2 b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* a 4) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* a 4) #s(hole binary64 (* 4 a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -2 (/ c b))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* 4 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* 4 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7))))))))))))))
#s(approx (- (- (* b b) (* (* a 4) c)) (* b b)) #s(hole binary64 (* -4 (* a c))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (/ c b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 4 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (+ (* 4 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 4 (/ b (pow (sqrt -4) 2))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (+ (* 4 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ c b)) (/ b a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* 2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (/ (+ b (* -2 (* (sqrt (* a c)) (sqrt -1)))) a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (/ (+ (* -2 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -4 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1 (* a b))) a))) a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (/ (+ (* -2 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (* a b)) (* -1 (/ (+ (* -4 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 4 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a))) a))) a))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 b) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* 4 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* a b)) a)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))))) (* 4 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a))) a)) (* a b)) a)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (+ (* -1 (pow b 2)) (* a c)) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 4 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 4 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 4 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -4 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 4 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 4 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* b (+ (* 4 (* b (+ (* -1 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3))))))) (* 4 (/ 1 (pow (sqrt -4) 2))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -4 (* b (- (* 1/2 (/ 1 (* a (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 4 (+ (* -1 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 4 (/ 1 (pow (sqrt -4) 2))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (+ (* -2 (/ (* a (pow c 2)) (pow b 2))) (* 4 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* 4 (/ (+ (* -2 (* (pow a 4) (pow c 4))) (* -1/2 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (* a c) (pow b 2))))))))
#s(approx (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -2 (/ b a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* 4 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (* 2 (/ 1 a))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* 4 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 4 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (* 2 (/ 1 a)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* 4 (/ (+ (* -1 (* (pow a 2) (pow c 2))) (* 1/2 (* (pow a 2) (pow c 2)))) (pow b 4)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (+ (* 4 (/ (+ (* -1 (* a (* c (+ (* -1 (* (pow a 2) (pow c 2))) (* 1/2 (* (pow a 2) (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a c))) (* (pow a 3) (pow c 3)))) (pow b 6))) (* 4 (/ (+ (* -1 (* (pow a 2) (pow c 2))) (* 1/2 (* (pow a 2) (pow c 2)))) (pow b 4))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (+ c c) #s(hole binary64 (* 2 c)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* -2 c) #s(hole binary64 (* -2 c)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 5))) (* -2 (/ a (pow b 3))))) (* 2 (/ 1 b))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* c (- (* c (+ (* -2 (/ a (pow b 3))) (* c (+ (* -4 (/ (pow a 2) (pow b 5))) (* 4 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (* 2 (/ 1 b))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* 4 (* c (+ (* -2 (/ (pow a 4) (pow b 7))) (* -1/2 (/ (pow a 4) (pow b 7))))))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (/ a b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (- (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 4 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -4 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (- (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 4 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* 2 (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4))))) (pow c 3)))) (+ (* -4 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (+ (* 4 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow b 3) (pow c 2)) (* a (pow (sqrt -4) 4))))) (pow c 3))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ a b)) (/ b c))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1 (/ (* b c) a))) c)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/2 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/8 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/2 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1 (/ (* b c) a))) c)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* 4 (/ (+ (* -1/8 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1))))) c)) (* b c)) c)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (* -1/8 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))))) (* 4 (/ (+ (* -1/2 (* (sqrt (/ c a)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow b 3) (pow c 2)) a))) c))) c)) (* b c)) c)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))

Calls

9 calls:

Time	Variable		Point	Expression
8.0ms	c	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) (* 1/2 (/ b a)) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (- (- (* b b) (* (* a 4) c)) (* b b)))
8.0ms	c	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) (* 1/2 (/ b a)) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (- (- (* b b) (* (* a 4) c)) (* b b)))
6.0ms	b	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) (* 1/2 (/ b a)) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (- (- (* b b) (* (* a 4) c)) (* b b)))
6.0ms	a	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) (* 1/2 (/ b a)) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (- (- (* b b) (* (* a 4) c)) (* b b)))
6.0ms	a	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (* a (/ c b)) (/ c b) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (/ c a) (* 1/2 (/ b a)) 1/2 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) -2 (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (- (- (* b b) (* (* a 4) c)) (* b b)))

rewrite208.0ms (3.7%)

Memory

19.7MiB live, 152.3MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1842	23949
0	1923	22971
0	8064	22777

Stop Event

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

Counts

503 → 554

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))
(neg.f64 b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
(/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
(*.f64 #s(literal 2 binary64) a)
a
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
#s(literal -1 binary64)
(/.f64 b a)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))
(-.f64 (*.f64 a (/.f64 c b)) b)
(*.f64 a (/.f64 c b))
(/.f64 c b)
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 b b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))
(+.f64 c c)
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))
(neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(/.f64 c a)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
#s(literal 1/2 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))
(*.f64 #s(literal -2 binary64) c)
#s(literal -2 binary64)
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
(.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))
(/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)) a)
(/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx a #s(hole binary64 a))
#s(approx (* -1 (/ b a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (- (/ (* a c) b) b)))
#s(approx (* a (/ c b)) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ c a) -1) #s(hole binary64 (* -1 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -2 (/ (* a c) b)) (* 2 b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* a 4) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* a 4) #s(hole binary64 (* 4 a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -2 (/ c b))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* 4 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* 4 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7))))))))))))))
#s(approx (- (- (* b b) (* (* a 4) c)) (* b b)) #s(hole binary64 (* -4 (* a c))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (/ c b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 4 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (+ (* 4 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 4 (/ b (pow (sqrt -4) 2))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (+ (* 4 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ c b)) (/ b a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* 2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (/ (+ b (* -2 (* (sqrt (* a c)) (sqrt -1)))) a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (/ (+ (* -2 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -4 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1 (* a b))) a))) a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (/ (+ (* -2 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (* a b)) (* -1 (/ (+ (* -4 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 4 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a))) a))) a))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 b) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* 4 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* a b)) a)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))))) (* 4 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a))) a)) (* a b)) a)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (+ (* -1 (pow b 2)) (* a c)) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 4 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 4 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 4 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -4 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 4 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 4 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* b (+ (* 4 (* b (+ (* -1 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3))))))) (* 4 (/ 1 (pow (sqrt -4) 2))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -4 (* b (- (* 1/2 (/ 1 (* a (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 4 (+ (* -1 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 4 (/ 1 (pow (sqrt -4) 2))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (+ (* -2 (/ (* a (pow c 2)) (pow b 2))) (* 4 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* 4 (/ (+ (* -2 (* (pow a 4) (pow c 4))) (* -1/2 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (* a c) (pow b 2))))))))
#s(approx (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -2 (/ b a))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* 4 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (* 2 (/ 1 a))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* 4 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 4 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (* 2 (/ 1 a)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* 4 (/ (+ (* -1 (* (pow a 2) (pow c 2))) (* 1/2 (* (pow a 2) (pow c 2)))) (pow b 4)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (+ (* 4 (/ (+ (* -1 (* a (* c (+ (* -1 (* (pow a 2) (pow c 2))) (* 1/2 (* (pow a 2) (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a c))) (* (pow a 3) (pow c 3)))) (pow b 6))) (* 4 (/ (+ (* -1 (* (pow a 2) (pow c 2))) (* 1/2 (* (pow a 2) (pow c 2)))) (pow b 4))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (+ c c) #s(hole binary64 (* 2 c)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* -2 c) #s(hole binary64 (* -2 c)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 5))) (* -2 (/ a (pow b 3))))) (* 2 (/ 1 b))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (* c (- (* c (+ (* -2 (/ a (pow b 3))) (* c (+ (* -4 (/ (pow a 2) (pow b 5))) (* 4 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (* 2 (/ 1 b))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* 4 (* c (+ (* -2 (/ (pow a 4) (pow b 7))) (* -1/2 (/ (pow a 4) (pow b 7))))))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (/ a b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (- (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 4 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -4 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (- (+ (* -4 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 4 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* 2 (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4))))) (pow c 3)))) (+ (* -4 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -4 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 4 (/ b (pow (sqrt -4) 2))) (+ (* 4 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow b 3) (pow c 2)) (* a (pow (sqrt -4) 4))))) (pow c 3))) (* 4 (/ (+ (* -1 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow c 3) a)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ a b)) (/ b c))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (neg (sqrt (* (/ c a) -1))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (* (/ c a) -1)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1 (/ (* b c) a))) c)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/2 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/8 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/2 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1 (/ (* b c) a))) c)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* 4 (/ (+ (* -1/8 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1))))) c)) (* b c)) c)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (* -1/8 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))))) (* 4 (/ (+ (* -1/2 (* (sqrt (/ c a)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow c 3) a)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow b 3) (pow c 2)) a))) c))) c)) (* b c)) c)) (* 2 (* (sqrt (* a c)) (sqrt -1))))))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c)) (neg.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))))
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(/.f64 (-.f64 (.f64 b b) (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b) #s(literal 3 binary64))) (+.f64 (.f64 b b) (+.f64 (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)) (.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))))
(-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))
(neg.f64 b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
(/.f64 (neg.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a))
(+.f64 (/.f64 (neg.f64 b) (.f64 #s(literal 2 binary64) a)) (/.f64 #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b)) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (.f64 b b) (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))))))
(+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
(*.f64 #s(literal 2 binary64) a)
a
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
#s(literal -1 binary64)
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c)) (neg.f64 #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
(.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b))
(/.f64 (-.f64 (.f64 (.f64 a (/.f64 c b)) (.f64 a (/.f64 c b))) (.f64 b b)) (+.f64 (*.f64 a (/.f64 c b)) b))
(/.f64 (-.f64 (pow.f64 (.f64 a (/.f64 c b)) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (.f64 (.f64 a (/.f64 c b)) (.f64 a (/.f64 c b))) (+.f64 (.f64 b b) (.f64 (*.f64 a (/.f64 c b)) b))))
(-.f64 (*.f64 a (/.f64 c b)) b)
(*.f64 a (/.f64 c b))
(/.f64 (neg.f64 c) (neg.f64 b))
(/.f64 c b)
(/.f64 (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))))) (neg.f64 (.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (/.f64 (neg.f64 b) (.f64 #s(literal 2 binary64) a)) (/.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(pow.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.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)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))))
(/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))
(+.f64 (/.f64 c (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 c (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))))
(/.f64 (-.f64 (.f64 c c) (.f64 c c)) (-.f64 c c))
(/.f64 (+.f64 (pow.f64 c #s(literal 3 binary64)) (pow.f64 c #s(literal 3 binary64))) (+.f64 (.f64 c c) (-.f64 (.f64 c c) (*.f64 c c))))
(+.f64 c c)
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) #s(literal 3 binary64))) (+.f64 (.f64 b b) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))))
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 #s(literal 4 binary64) a) c) (.f64 (.f64 #s(literal 4 binary64) a) c))) (+.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal 4 binary64) a) c) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) a) c) (.f64 (.f64 #s(literal 4 binary64) a) c)) (.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))))
(-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(.f64 (.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(/.f64 (-.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))) (+.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) #s(literal 3 binary64))) (+.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) (.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))))
(-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))
(+.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 b a)))
(neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(*.f64 (sqrt.f64 (/.f64 c a)) (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(/.f64 (neg.f64 c) (neg.f64 a))
(/.f64 c a)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
#s(literal 1/2 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (.f64 #s(literal -2 binary64) c)) (neg.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)))
(/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))
(*.f64 #s(literal -2 binary64) c)
#s(literal -2 binary64)
(/.f64 (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 b b)) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c))) (+.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
(.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))) (neg.f64 a))
(/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)) a)
(/.f64 (neg.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b))) (neg.f64 (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))
(/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(-.f64 (/.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (/.f64 (.f64 b b) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (*.f64 b b)))
(/.f64 (-.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 3 binary64)) (pow.f64 (.f64 b b) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)))))
(-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b))
(+.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (neg.f64 b) b))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) b) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b)) (*.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 a (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 a (-.f64 (.f64 a (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 b (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (-.f64 (.f64 #s(literal 4 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -16 binary64) (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64)))))) b))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 a (-.f64 (.f64 #s(literal 4 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -16 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64)))))) b)))))))))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx a a)
#s(approx (* -1 (/ b a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ b a) (/.f64 b a))
#s(approx (* 2 (- (* a (/ c b)) b)) (*.f64 #s(literal -2 binary64) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (-.f64 (.f64 #s(literal -2 binary64) b) (.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b))))
#s(approx (- (* a (/ c b)) b) (*.f64 #s(literal -1 binary64) b))
#s(approx (- (* a (/ c b)) b) (-.f64 (/.f64 (*.f64 a c) b) b))
#s(approx (* a (/ c b)) (/.f64 (*.f64 a c) b))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)))
#s(approx (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) b) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))))))))))))
#s(approx (* (* 4 a) c) (.f64 #s(literal 4 binary64) (.f64 a c)))
#s(approx (* 4 a) (*.f64 #s(literal 4 binary64) a))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) a)))
#s(approx (neg (sqrt (* (/ c a) -1))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (sqrt (* (/ c a) -1)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (* (/ c a) -1) (*.f64 #s(literal -1 binary64) (/.f64 c a)))
#s(approx (/ c a) (/.f64 c a))
#s(approx (* 1/2 (/ b a)) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (*.f64 #s(literal 2 binary64) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)) (*.f64 #s(literal -2 binary64) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) b)
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (-.f64 b (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 b (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 b (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (- (* b b) (* (* a 4) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* a 4) c)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)))
#s(approx (* (* a 4) c) (.f64 #s(literal 4 binary64) (.f64 a c)))
#s(approx (* a 4) (*.f64 #s(literal 4 binary64) a))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))))))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (*.f64 #s(literal -2 binary64) (/.f64 c b)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 3 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -4 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))))))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 a (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (.f64 a (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -4 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64))))))))))))))
#s(approx (- (- (* b b) (* (* a 4) c)) (* b b)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 a a))))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 a a)))))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (/.f64 b a))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 b a)) (*.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (- (* a (/ c b)) b) (/.f64 (*.f64 a c) b))
#s(approx (- (* a (/ c b)) b) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (/.f64 c b))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 a a))))) a))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 a a)))))) a))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 a a))))) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 a a)))))) a))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 a (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 a a))))) a))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 a a)))))) a))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -4 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 a a))))) a))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 a a)))))) a))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -4 binary64) (/.f64 b #s(literal -4 binary64)))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 a a))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 a a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal 1/2 binary64) (*.f64 a b))) a))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (/.f64 b a) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) b) a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (.f64 #s(literal -2 binary64) (/.f64 b a))))))
#s(approx (- (* a (/ c b)) b) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 c b)) (/.f64 b a)))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal 1/2 binary64) (*.f64 a b))) a))) a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal 1/2 binary64) (*.f64 a b))) a))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a))) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 #s(literal -1 binary64) (.f64 a (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal 1/2 binary64) (*.f64 a b))) a))) a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 #s(literal 1 binary64) (.f64 a b))) a))) a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 a b) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a)) (.f64 #s(literal -4 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))) a))) a))) a)))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -1 binary64) b) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) a)) (.f64 a b)) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) c))) a))) a)) (.f64 a b)) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64))))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 2 binary64) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))))) (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (*.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 3 binary64))))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* 2 (- (* a (/ c b)) b)) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 b b)) (.f64 #s(literal -2 binary64) (.f64 a c))) b))
#s(approx (- (* a (/ c b)) b) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 b b)) (*.f64 a c)) b))
#s(approx (/ c b) (/.f64 c b))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (*.f64 a c))))
#s(approx (* b b) (*.f64 b b))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 2 binary64) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))))) (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 2 binary64) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))))) (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 b (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 b (sqrt.f64 #s(literal -4 binary64))))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (+.f64 #s(literal 1 binary64) (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (*.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (*.f64 a c))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 2 binary64) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))))) (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (-.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -4 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 4 binary64) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -4 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 a a) (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -4 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))))) (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a #s(literal -4 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (.f64 #s(literal 4 binary64) (+.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))) #s(literal -1/4 binary64))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -4 binary64) (.f64 b (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a (.f64 c #s(literal 16 binary64))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 #s(literal -4 binary64) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))))))) #s(literal 1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))) #s(literal 2 binary64))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 a (pow.f64 b #s(literal 6 binary64)))))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 b (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))) #s(literal 2 binary64))))
#s(approx (- (* a (/ c b)) b) (.f64 b (-.f64 (/.f64 (.f64 a c) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (.f64 b b) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a c) (*.f64 b b))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) b))) (.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (.f64 b b))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (*.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 (.f64 b b) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 a c) (*.f64 b b))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/.f64 (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) c) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (.f64 b b)))) b))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (.f64 a (.f64 c c)) (*.f64 b b))))) b))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) c) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a (.f64 c c)) (.f64 b b))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))) b))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))))) b))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (pow.f64 b #s(literal 6 binary64))))))) b))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (.f64 #s(literal 1 binary64) b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))) (.f64 a (.f64 c c))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))) (.f64 a (.f64 c c)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 (.f64 a a) c))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))) (.f64 a (.f64 c c))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -2 binary64) (.f64 a c))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (*.f64 b b))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b)))))) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 #s(literal -1 binary64) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (*.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 a (.f64 c c)) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (- (* a (/ c b)) b) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (if (>= b 0) (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (.f64 #s(literal -1 binary64) b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (.f64 #s(literal 1 binary64) b)) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))) (.f64 a (.f64 c c))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))) (.f64 a (.f64 c c)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 (.f64 a a) c))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))) (.f64 a (.f64 c c))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) b)) (.f64 #s(literal -1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))) (*.f64 #s(literal -1 binary64) b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (*.f64 c c)))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 (.f64 a a) c))) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c)))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (*.f64 b b)))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (*.f64 b b))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 a c)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (*.f64 a c) #s(literal 4 binary64)))) (pow.f64 b #s(literal 6 binary64))))))) b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (*.f64 #s(literal -1 binary64) b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (.f64 a c) #s(literal 3 binary64)) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 a c) (.f64 b b)) (/.f64 (pow.f64 (.f64 a c) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (*.f64 c c)))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -1 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 (.f64 a a) c))) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c)))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (*.f64 #s(literal -2 binary64) (/.f64 b a)))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c)))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 (.f64 a a) c))) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))))) (pow.f64 b #s(literal 6 binary64)))) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c c))) (.f64 #s(literal -1/2 binary64) (.f64 a (.f64 c c)))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal -1 binary64)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 #s(literal -2 binary64) b))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (-.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a c) (*.f64 b b)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (.f64 b b))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64)))) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 #s(literal -1 binary64) (.f64 b (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (.f64 b b))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64))) (.f64 #s(literal -16 binary64) (pow.f64 (.f64 a c) #s(literal 4 binary64)))) (.f64 a c))) (pow.f64 (.f64 a c) #s(literal 3 binary64)))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64)))) (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))))))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* 2 c) (*.f64 #s(literal 2 binary64) c))
#s(approx c c)
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 c (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 b (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -16 binary64) (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))))) b))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 c (-.f64 (.f64 #s(literal 4 binary64) (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal -16 binary64) (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64)))))) b)))))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))))))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ c c) (*.f64 #s(literal 2 binary64) c))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))))))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* -2 c) (*.f64 #s(literal -2 binary64) c))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (*.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 #s(literal 2 binary64) b) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 b (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 b (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))))))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (*.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))))))))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) (pow.f64 b #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 c (-.f64 (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -4 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))))))))))) (.f64 #s(literal 2 binary64) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (/.f64 (.f64 (.f64 a a) c) (pow.f64 b #s(literal 3 binary64)))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) (pow.f64 b #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 c (+.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal -4 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 7/2 binary64)))) (.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 7/2 binary64))))))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 c c)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64)))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pown3/2s.f64 (.f64 a c)) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (/.f64 b c))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 b c)) (*.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (- (* a (/ c b)) b) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (/.f64 a b))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 c c)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64)))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 c c)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64)))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 c c)))) (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (-.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64)))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (-.f64 (-.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 c c)))) (.f64 #s(literal -4 binary64) (/.f64 b (.f64 a #s(literal -4 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (-.f64 (-.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal -2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64))))) (pow.f64 c #s(literal 3 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 b (.f64 a #s(literal -4 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (*.f64 c c))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (sqrt.f64 (.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 b #s(literal -4 binary64))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (/.f64 (.f64 b (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))))) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 3 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64))))) (pow.f64 c #s(literal 3 binary64))) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 c c)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) c)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (/.f64 b c) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) b) c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (.f64 #s(literal -2 binary64) (/.f64 b c))))))
#s(approx (- (* a (/ c b)) b) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (/.f64 b c)))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) c)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (neg (sqrt (* (/ c a) -1))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (sqrt (* (/ c a) -1)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) c)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 b c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 b (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -1 binary64) (.f64 c (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 5 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 c #s(literal 7 binary64))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 #s(literal -1 binary64) (.f64 c (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) c)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 b c) a))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 b a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b c) a))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) c) (.f64 a a)))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) c)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b c) a))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))) c)) (.f64 b c)) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))))))
#s(approx (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -4 binary64) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))))) (.f64 #s(literal -4 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 c a)) (.f64 b (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (pow.f64 c #s(literal 3 binary64)) a)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 3 binary64)) (.f64 c c)) a))) c))) c)) (.f64 b c)) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64))))))

eval313.0ms (5.5%)

Memory

38.8MiB live, 275.5MiB allocated; 46ms collecting garbage

Samples

136.0ms	2 901×	0	invalid
31.0ms	683×	0	valid

Compiler

Compiled 78 310 to 4 248 computations (94.6% saved)

Precisions

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

ival-mult: 38.0ms (61.1% of total)

ival-div: 13.0ms (20.9% of total)

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

ival-true: 2.0ms (3.2% of total)

adjust: 1.0ms (1.6% of total)

ival-sqrt: 1.0ms (1.6% of total)

ival-assert: 1.0ms (1.6% of total)

exact: 0.0ms (0% of total)

prune38.0ms (0.7%)

Memory

-31.9MiB live, 60.1MiB allocated; 9ms collecting garbage

Pruning

14 alts after pruning (13 fresh and 1 done)

	Pruned	Kept	Total
New	890	8	898
Fresh	6	5	11
Picked	4	1	5
Done	0	0	0
Total	900	14	914

Accuracy

100.0%

Counts

914 → 14

Alt Table

Click to see full alt table

Status	Accuracy	Program
	49.6%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)))) (.f64 #s(literal 2 binary64) a)))
	62.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
▶	73.3%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
	50.7%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
▶	44.9%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
	46.1%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
✓	62.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
▶	24.7%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
	23.8%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
▶	35.9%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
	39.8%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	44.9%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
▶	44.6%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
	51.8%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))))))))

Compiler

Compiled 1 644 to 893 computations (45.7% saved)

series64.0ms (1.1%)

Memory

25.3MiB live, 69.8MiB allocated; 8ms collecting garbage

Counts

62 → 426

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))
(neg.f64 b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
(/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
(*.f64 #s(literal -2 binary64) b)
#s(literal -2 binary64)
(*.f64 #s(literal 2 binary64) a)
a
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
#s(literal -1 binary64)
(/.f64 b a)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))
(*.f64 (/.f64 c a) #s(literal -4 binary64))
(/.f64 c a)
#s(literal -4 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (*.f64 a c) b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (*.f64 a c) b))))
(.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (*.f64 a c) b)))
#s(approx (- (* a (/ c b)) b) (/.f64 (*.f64 a c) b))
(/.f64 (*.f64 a c) b)
(*.f64 a c)
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 b b)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
(*.f64 #s(literal -2 binary64) c)
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))
(.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))
(+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))
(sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(/.f64 a c)
(/.f64 b c)
(.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a)
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
#s(literal 4 binary64)

Outputs
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx a #s(hole binary64 a))
#s(approx (* -1 (/ b a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (sqrt (* (/ c a) -4)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -4))))
#s(approx (* (/ c a) -4) #s(hole binary64 (* -4 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (- (/ (* a c) b) b)))
#s(approx (/ (* a c) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (* a c) #s(hole binary64 (* a c)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -2 (/ (* a c) b)) (* 2 b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* (sqrt (/ a c)) (sqrt -4))))
#s(approx (* (/ a c) -4) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ c b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* a 4) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* a 4) #s(hole binary64 (* 4 a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (/ c b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* (sqrt (/ a c)) (sqrt -4))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* a (+ (* (sqrt (/ 1 (* a c))) (sqrt -4)) (/ b (* a c))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -4))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (* (/ c a) -4)) #s(hole binary64 (* 2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ c b)) (/ b a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b (* a c))) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ b a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a))) a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* -2 b) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (+ (* -1 (pow b 2)) (* a c)) b)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ b c) #s(hole binary64 (/ b c)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 b))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* b (+ 1 (* (sqrt (* a c)) (/ (sqrt -4) b))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (/ b c)))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* b (+ (* (sqrt (/ a c)) (/ (sqrt -4) b)) (/ 1 c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (+ (* -2 (/ (* a (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (* a c) (pow b 2))))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (* a c)) (/ (sqrt -4) b))) 1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (/ a c)) (/ (sqrt -4) b))) (/ 1 c))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ b a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* -2 c) #s(hole binary64 (* -2 c)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (/ (+ b (* (sqrt (* a c)) (sqrt -4))) c)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 5))) (* -2 (/ a (pow b 3))))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -2 (/ a (pow b 3))) (* c (+ (* -4 (/ (pow a 2) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (* 2 (/ 1 b))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (/ a b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (* (/ c a) -4)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ a b)) (/ b c))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -1 (* c (+ (* -2 (* (sqrt (/ a c)) (sqrt -1))) (* -1 (/ b c)))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (/ b (* a c)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))

Calls

9 calls:

Time	Variable		Point	Expression
6.0ms	c	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* -2 b) -2 (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (* 1/2 (sqrt (* (/ c a) -4))) 1/2 (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (/ (* a c) b) (* a c) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b) (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (+ (sqrt (* (/ a c) -4)) (/ b c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ b c) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) 4)
6.0ms	a	@	-inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* -2 b) -2 (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (* 1/2 (sqrt (* (/ c a) -4))) 1/2 (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (/ (* a c) b) (* a c) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b) (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (+ (sqrt (* (/ a c) -4)) (/ b c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ b c) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) 4)
6.0ms	a	@	0	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* -2 b) -2 (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (* 1/2 (sqrt (* (/ c a) -4))) 1/2 (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (/ (* a c) b) (* a c) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b) (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (+ (sqrt (* (/ a c) -4)) (/ b c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ b c) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) 4)
5.0ms	a	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* -2 b) -2 (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (* 1/2 (sqrt (* (/ c a) -4))) 1/2 (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (/ (* a c) b) (* a c) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b) (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (+ (sqrt (* (/ a c) -4)) (/ b c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ b c) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) 4)
5.0ms	c	@	inf	((if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (>= b 0) b 0 (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 c (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* -2 b) -2 (* 2 a) a (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* -1 (/ b a)) -1 (/ b a) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (* 1/2 (sqrt (* (/ c a) -4))) 1/2 (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 (- (* a (/ c b)) b)) (- (* a (/ c b)) b) (/ (* a c) b) (* a c) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b) (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (+ (sqrt (* (/ a c) -4)) (/ b c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ b c) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt (- (* b b) (* (* a 4) c))) (- (* b b) (* (* a 4) c)) (* (* a 4) c) (* a 4) 4)

rewrite186.0ms (3.3%)

Memory

0.1MiB live, 146.1MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1652	19180
0	1707	17428
0	8206	17165

Stop Event

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

Counts

488 → 544

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
c
(-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))
(neg.f64 b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
(/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
(*.f64 #s(literal -2 binary64) b)
#s(literal -2 binary64)
(*.f64 #s(literal 2 binary64) a)
a
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
#s(literal -1 binary64)
(/.f64 b a)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))
(*.f64 (/.f64 c a) #s(literal -4 binary64))
(/.f64 c a)
#s(literal -4 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (*.f64 a c) b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (*.f64 a c) b))))
(.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (*.f64 a c) b)))
#s(approx (- (* a (/ c b)) b) (/.f64 (*.f64 a c) b))
(/.f64 (*.f64 a c) b)
(*.f64 a c)
(/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 b b)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
(*.f64 #s(literal -2 binary64) c)
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))
(.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))
(+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))
(sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(/.f64 a c)
(/.f64 b c)
(.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a)
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) b)) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow b 3))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))) (* -2 (/ c b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx a #s(hole binary64 a))
#s(approx (* -1 (/ b a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (sqrt (* (/ c a) -4)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -4))))
#s(approx (* (/ c a) -4) #s(hole binary64 (* -4 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (- (/ (* a c) b) b)))
#s(approx (/ (* a c) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (* a c) #s(hole binary64 (* a c)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (+ b (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) b) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* 2 (* a (+ (* -2 (/ (pow c 4) (pow b 7))) (* -1/2 (/ (pow c 4) (pow b 7)))))))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -2 (/ (* a c) b)) (* 2 b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* (sqrt (/ a c)) (sqrt -4))))
#s(approx (* (/ a c) -4) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* -1 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -2 (/ (* a (pow c 3)) (pow b 5))) (* -1 (/ (pow c 2) (pow b 3))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (/ c b)) (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* a (+ (* -2 (/ (pow c 3) (pow b 5))) (* -1/4 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ c b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -2 (/ c b)) (* a (+ (* -2 (/ (pow c 2) (pow b 3))) (* a (+ (* -4 (/ (pow c 3) (pow b 5))) (* -1/2 (/ (* a (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) b))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* -2 (/ (* a c) b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* a (+ (* -2 (/ c b)) (* a (+ (* -4 (/ (* a (pow c 3)) (pow b 5))) (* -2 (/ (pow c 2) (pow b 3))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* (* a 4) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* a 4) #s(hole binary64 (* 4 a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (* a c) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (/ c b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2))))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (+ (* 2 (/ b (pow (sqrt -4) 2))) (+ (* 2 (/ (+ (* -1 (* (sqrt (/ a c)) (/ (* b (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (* -1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4))))) (pow a 3))) (* 2 (/ (+ (* -1 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ (pow a 3) c)) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow a 2)))))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* a (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* (sqrt (/ a c)) (sqrt -4))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* a (+ (* (sqrt (/ 1 (* a c))) (sqrt -4)) (/ b (* a c))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -4))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -1 (/ b a)) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))) (/ b a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* a (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))) (/ b a)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* a (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ c a)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -4 (* a c))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (* (/ c a) -4)) #s(hole binary64 (* 2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ c b)) (/ b a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* 1/2 b)) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -2 (/ (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (sqrt (* a c)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (+ (* -1/2 (* (sqrt (/ a c)) (* b (* (sqrt -1) (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))))) (* -1/32 (/ (* (pow a 2) (pow b 3)) c))) a)) (* 2 (+ (* -1/8 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1)))) (* 1/16 (* (sqrt (/ (pow a 3) c)) (* (pow b 2) (sqrt -1))))))) a)) (* -1/2 (* a b))) a))) a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a))) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ b (* a c))) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a)) (* 1/2 b)) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ b a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) a)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1)))) (* 1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1))))) a))) a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) b) a)) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* a (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 7) (pow c 5)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ c a)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* -2 b) #s(hole binary64 (* -2 b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (/ (+ (* -1 (pow b 2)) (* a c)) b)))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* 2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* 2 (* b (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* b (+ (* b (+ (* -2 (* b (- (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 4))))) (* -1 (* (sqrt (/ 1 (* a c))) (/ (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3))))) (sqrt -4))))))) (* 2 (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (pow (sqrt -4) 3)))))))) (* 2 (/ 1 (* a (pow (sqrt -4) 2)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (+ 1 (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (+ b (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ b c) #s(hole binary64 (/ b c)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ b (sqrt -4)))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))))) (/ 1 a))) (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* 1/2 (* (sqrt (/ 1 (* a c))) (/ b (sqrt -4)))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* b (- (* b (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))) 1)) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ (* (sqrt (* a c)) (sqrt -4)) (* (pow b 2) (+ (* 1/2 (* (sqrt (/ 1 (* a c))) (/ 1 (sqrt -4)))) (* (pow b 2) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ 1 (pow (sqrt -4) 3)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 2) (pow (sqrt -4) 5)))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* 2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 b))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* b (+ 1 (* (sqrt (* a c)) (/ (sqrt -4) b))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (/ b c)))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* b (+ (* (sqrt (/ a c)) (/ (sqrt -4) b)) (/ 1 c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (* -1 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -1 c) (+ (* -1 (/ (* a (pow c 2)) (pow b 2))) (* -1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2))))) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (+ (* -2 c) (+ (* -2 (/ (* a (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6))))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(hole binary64 (if (>= b 0) (* 2 (/ c (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (+ (* -1 (* a (* c (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2)))))) (+ (* -1 (* (pow a 2) (pow c 3))) (* 1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))))) (pow b 6))) (+ (* -2 (/ (+ (* -1/2 (* a (pow c 2))) (* a (pow c 2))) (pow b 4))) (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))))) b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -2 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (/ (* a c) (pow b 2))))))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) #s(hole binary64 (if (>= b 0) (* -2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))) (* 1/2 (/ (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* 2 (/ (+ (* -1 (* a (* c (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2))))))) (+ (* -1/8 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* (pow a 2) c))) (* (pow a 2) (pow c 3)))) (pow b 6))) (+ (* 2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ 1 a))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (* a c)) (/ (sqrt -4) b))) 1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (/ a c)) (/ (sqrt -4) b))) (/ 1 c))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* b (+ (* -2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -1 (/ c (pow b 2))) (+ (* -1 (/ (* a (pow c 2)) (pow b 4))) (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -2 (/ b a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* b (+ (* -4 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (* -2 (/ c (pow b 2))) (+ (* -2 (/ (* a (pow c 2)) (pow b 4))) (* 2 (/ 1 a)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -2 b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx c #s(hole binary64 c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow b 3))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))) (* -2 (/ a b)))) (* 2 b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* 2 (* c (+ (* -2 (/ (pow a 3) (pow b 7))) (* -1/2 (/ (pow a 3) (pow b 7)))))))))) (/ 1 b)))))
#s(approx (* -2 c) #s(hole binary64 (* -2 c)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (+ (* 2 b) (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (/ (+ b (* (sqrt (* a c)) (sqrt -4))) c)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* -1 (/ (* a c) (pow b 3))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -2 (/ (* (pow a 2) c) (pow b 5))) (* -1 (/ a (pow b 3))))) (/ 1 b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (- (* c (+ (* -1 (/ a (pow b 3))) (* c (+ (* -2 (/ (pow a 2) (pow b 5))) (* -1/4 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (/ 1 b)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 5))) (* -2 (/ a (pow b 3))))) (* 2 (/ 1 b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (- (* c (+ (* -2 (/ a (pow b 3))) (* c (+ (* -4 (/ (pow a 2) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (* a b))))))) (* 2 (/ 1 b))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3)))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -2 (/ a b)) (* c (+ (* -2 (/ (pow a 2) (pow b 3))) (* c (+ (* -4 (/ (pow a 3) (pow b 5))) (* -1/2 (/ (* c (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) b))))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* -2 (/ (* (pow a 2) c) (pow b 3))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (+ b (* c (+ (* -2 (/ a b)) (* c (+ (* -4 (/ (* (pow a 3) c) (pow b 5))) (* -2 (/ (pow a 2) (pow b 3))))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (/ a b)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3))))) (pow c 2)))) (* -2 (/ b (* a (pow (sqrt -4) 2)))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -2 (* (sqrt (/ c a)) (/ 1 (sqrt -4)))) (* -1 (/ (+ (* -1 (* (sqrt (/ c a)) (/ (* b (+ (* -1 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (sqrt -4)))) (/ (* (pow b 3) (pow c 2)) (* (pow a 2) (pow (sqrt -4) 4)))) (pow c 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 2)))) (+ (* -1 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* 2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ a c)) (sqrt -4)) (/ b c)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))) (/ b c)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* c (- (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))) (/ b c)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* c (+ (* -1/8 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (/ (pow b 6) (pow (sqrt -4) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* a (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* (sqrt (/ a c)) (sqrt -4))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (* (/ c a) -4)) #s(hole binary64 (* -2 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* 2 (- (* a (/ c b)) b)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- (* a (/ c b)) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ a b)) (/ b c))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1))))))))) (* -1/16 (/ (* (pow b 3) c) (pow a 2)))) (+ (* -1/4 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/8 (* (sqrt (/ (pow c 3) (pow a 3))) (* (pow b 2) (sqrt -1)))))) c)) (* -1/2 (/ (* b c) a))) c)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ b (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) #s(hole binary64 (* -1 (* c (+ (* -2 (* (sqrt (/ a c)) (sqrt -1))) (* -1 (/ b c)))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) #s(hole binary64 (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* -1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (/ b (* a c)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ b a)) (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) c))) c)) (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* 2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1/4 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (- (* -1 (/ (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 4) (sqrt -1)))) (* 1/4 (* (sqrt (/ c a)) (* (pow b 2) (sqrt -1))))) c)) b) c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) #s(hole binary64 (* -1 (* c (+ (* -1/64 (* (sqrt (/ 1 (* (pow a 3) (pow c 5)))) (* (pow b 4) (sqrt -1)))) (+ (* 1/512 (* (sqrt (/ 1 (* (pow a 5) (pow c 7)))) (* (pow b 6) (sqrt -1)))) (+ (* 1/4 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 2) (sqrt -1)))) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))))))
#s(approx (- (* b b) (* (* a 4) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c)) (neg.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))))
(/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
(+.f64 c c)
#s(literal 2 binary64)
c
(/.f64 (-.f64 (.f64 b b) (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b) #s(literal 3 binary64))) (+.f64 (.f64 b b) (+.f64 (.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)) (.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b)))))
(-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))
(*.f64 #s(literal -1 binary64) b)
(neg.f64 b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
(/.f64 (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b)) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b))) (neg.f64 (.f64 #s(literal 2 binary64) a)))
(/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
(*.f64 #s(literal -2 binary64) b)
#s(literal -2 binary64)
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
a
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
(/.f64 (neg.f64 b) a)
(neg.f64 (/.f64 b a))
#s(literal -1 binary64)
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 c a))) (sqrt.f64 #s(literal -4 binary64)))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 (/.f64 c a)) (sqrt.f64 #s(literal -4 binary64)))
(pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))
(*.f64 (/.f64 c a) #s(literal -4 binary64))
(/.f64 (*.f64 c #s(literal -4 binary64)) a)
(/.f64 (neg.f64 c) (neg.f64 a))
(/.f64 c a)
#s(literal -4 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(.f64 #s(literal 2 binary64) (/.f64 c #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (*.f64 a (/.f64 c b)))))))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) c)) (neg.f64 #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (*.f64 a (/.f64 c b)))))))
(/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (*.f64 a (/.f64 c b))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (*.f64 a (/.f64 c b)))))
(.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (*.f64 a (/.f64 c b))))
(+.f64 #s(approx (- (* a (/ c b)) b) (.f64 a (/.f64 c b))) #s(approx (- ( a (/ c b)) b) (*.f64 a (/.f64 c b))))
#s(approx (- (* a (/ c b)) b) (*.f64 a (/.f64 c b)))
(*.f64 a (/.f64 c b))
(/.f64 (neg.f64 (*.f64 a c)) (neg.f64 b))
(/.f64 (*.f64 a c) b)
(*.f64 a c)
(/.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (neg.f64 b)) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (+.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b))) (neg.f64 (.f64 #s(literal 2 binary64) a)))
(/.f64 (+.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a))
(+.f64 (/.f64 (neg.f64 b) (.f64 #s(literal 2 binary64) a)) (/.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (.f64 b b) (.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b))) #s(literal 3 binary64))) (+.f64 (.f64 b b) (-.f64 (.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))))
(+.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (neg.f64 b))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(pow.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.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)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))
(.f64 #s(literal -2 binary64) (/.f64 c #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
(/.f64 (neg.f64 (.f64 #s(literal -2 binary64) c)) (neg.f64 #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
(/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))))))
(*.f64 #s(literal -2 binary64) c)
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
(.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))))
(+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) c) (*.f64 (/.f64 b c) c))
(+.f64 (.f64 c (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (*.f64 c (/.f64 b c)))
(/.f64 (-.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (.f64 (/.f64 b c) (/.f64 b c))) (-.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 b c) #s(literal 3 binary64))) (+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (-.f64 (.f64 (/.f64 b c) (/.f64 b c)) (.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)))))
(+.f64 (/.f64 b c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))
(+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))
(*.f64 (sqrt.f64 (/.f64 a c)) (sqrt.f64 #s(literal -4 binary64)))
(pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(/.f64 (*.f64 a #s(literal -4 binary64)) c)
(/.f64 (neg.f64 a) (neg.f64 c))
(/.f64 a c)
(/.f64 (neg.f64 b) (neg.f64 c))
(/.f64 b c)
(.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) #s(literal 1/2 binary64)) a)
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)) (neg.f64 a))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a)
(-.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) a) (/.f64 b a))
(/.f64 (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (+.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b)
(pow.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c))) (+.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))
(/.f64 (-.f64 (pow.f64 (.f64 b b) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 (.f64 a #s(literal 4 binary64)) c) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))))
(-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))
(+.f64 (.f64 b b) (.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(.f64 (.f64 a #s(literal 4 binary64)) c)
(.f64 a (.f64 #s(literal 4 binary64) c))
(*.f64 a #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) b)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) b) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 c) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 a (+.f64 (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (*.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 a (+.f64 (.f64 a (+.f64 (.f64 (.f64 #s(literal 2 binary64) a) (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))))) (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (/.f64 (neg.f64 c) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 a (-.f64 (.f64 #s(literal 2 binary64) (.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 a (-.f64 (.f64 a (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 b (.f64 #s(literal 2 binary64) (.f64 a (/.f64 c b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 a (+.f64 (.f64 a (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 c) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (neg.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 a (+.f64 (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (*.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 a (+.f64 (.f64 a (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (/.f64 (neg.f64 c) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (.f64 a (/.f64 c b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 a (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 a (+.f64 (.f64 a (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx a a)
#s(approx (* -1 (/ b a)) (/.f64 (neg.f64 b) a))
#s(approx (/ b a) (/.f64 b a))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (sqrt (* (/ c a) -4)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(approx (* (/ c a) -4) (*.f64 #s(literal -4 binary64) (/.f64 c a)))
#s(approx (/ c a) (/.f64 c a))
#s(approx (* 2 (- (* a (/ c b)) b)) (*.f64 #s(literal -2 binary64) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))
#s(approx (- (* a (/ c b)) b) (neg.f64 b))
#s(approx (- (* a (/ c b)) b) (-.f64 (*.f64 a (/.f64 c b)) b))
#s(approx (/ (* a c) b) (*.f64 a (/.f64 c b)))
#s(approx (* a c) (*.f64 a c))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) b)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) b) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (neg.f64 c) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (neg.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 a (+.f64 (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (*.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 a (+.f64 (.f64 a (+.f64 (.f64 (.f64 #s(literal 2 binary64) a) (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))))) (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (/.f64 (neg.f64 c) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (*.f64 #s(literal 2 binary64) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (-.f64 (.f64 #s(literal -2 binary64) (.f64 a (/.f64 c b))) (*.f64 #s(literal -2 binary64) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))) (.f64 #s(literal 2 binary64) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 a (+.f64 (.f64 a (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (+.f64 (/.f64 b c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (* (/ a c) -4)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))
#s(approx (* (/ a c) -4) (*.f64 #s(literal -4 binary64) (/.f64 a c)))
#s(approx (/ a c) (/.f64 a c))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (neg.f64 c) b))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (neg.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 a (+.f64 (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (*.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))))) (/.f64 (neg.f64 c) b)))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 a (+.f64 (.f64 a (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (neg.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (/.f64 (neg.f64 c) b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.f64 #s(literal -2 binary64) (/.f64 c b)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 a (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (*.f64 #s(literal -2 binary64) (/.f64 c b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 a (+.f64 (.f64 a (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (*.f64 #s(literal -2 binary64) (/.f64 c b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (.f64 a (/.f64 c b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 a (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 a (+.f64 (.f64 a (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a (/.f64 (.f64 (ratio-of-squares.f64 (.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) b)
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (-.f64 b (.f64 #s(literal 2 binary64) (.f64 a (/.f64 c b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 a (.f64 #s(literal -2 binary64) (+.f64 (/.f64 c b) (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))))) b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 a (+.f64 (.f64 a (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 c b)))) b))
#s(approx (- (* b b) (* (* a 4) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* a 4) c)) (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
#s(approx (* (* a 4) c) (.f64 (.f64 #s(literal 4 binary64) a) c))
#s(approx (* a 4) (*.f64 #s(literal 4 binary64) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (.f64 a a)))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a))))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (/.f64 (neg.f64 b) a) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 a (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 7 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 (neg.f64 b) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a)))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 #s(literal 2 binary64) (.f64 a (/.f64 c b))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 b a)) (*.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (- (* a (/ c b)) b) (*.f64 a (/.f64 c b)))
#s(approx (- (* a (/ c b)) b) (*.f64 a (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 b #s(literal -4 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (.f64 a a)))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 b #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (neg.f64 (.f64 (sqrt.f64 (/.f64 a c)) (.f64 b (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))))) (pow.f64 a #s(literal 3 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a))))) a))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 a (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (.f64 a (+.f64 (/.f64 (/.f64 b a) c) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (/.f64 (neg.f64 b) a)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 (neg.f64 b) a))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 b a)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 a (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 a (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 7 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 a (-.f64 (/.f64 (.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 a c)) b) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64))))) (.f64 #s(literal 1/32 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 b #s(literal 3 binary64)) c)))) a)) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 a (-.f64 (/.f64 b a) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) b) a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) a)) b) a)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (.f64 a (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (.f64 a (+.f64 (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 7 binary64))) (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))) (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/128 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (sqrt (* (/ c a) -4)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* 2 (- (* a (/ c b)) b)) (neg.f64 (.f64 a (-.f64 (.f64 #s(literal -2 binary64) (/.f64 c b)) (*.f64 #s(literal -2 binary64) (/.f64 b a))))))
#s(approx (- (* a (/ c b)) b) (neg.f64 (*.f64 a (+.f64 (/.f64 b a) (/.f64 (neg.f64 c) b)))))
#s(approx (- (* b b) (* (* 4 a) c)) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) b)) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 a c)) b) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64))))) (.f64 #s(literal 1/32 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 b #s(literal 3 binary64)) c)))) a)) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c)) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/16 binary64)))) a)) (.f64 #s(literal 1/2 binary64) (.f64 a b))) a))) a)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 b (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))) (/.f64 (neg.f64 b) (*.f64 a c))))))
#s(approx (sqrt (* (/ a c) -4)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal 1/128 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (neg.f64 (/.f64 (-.f64 b (.f64 (.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 b a)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 a c))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) a)) b) a)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (neg.f64 (.f64 a (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (neg.f64 (.f64 a (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (neg.f64 (.f64 a (+.f64 (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 7 binary64))) (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))) (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (- (* b b) (* (* a 4) c)) (neg.f64 (.f64 a (-.f64 (neg.f64 (/.f64 (.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 b (+.f64 (/.f64 #s(literal 2 binary64) (.f64 a #s(literal -4 binary64))) (.f64 (.f64 #s(literal 2 binary64) b) (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))))) (.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (.f64 b (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal -2 binary64) b) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 a a) c) #s(literal 16 binary64))) (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))))))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 2 binary64) (.f64 a #s(literal -4 binary64))))) (.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (neg.f64 b) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (neg b) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64)))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) (/.f64 #s(literal 1/2 binary64) a))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) a))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (neg.f64 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (.f64 b (-.f64 (.f64 b (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* -2 b) (*.f64 #s(literal -2 binary64) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (.f64 b b)) (.f64 #s(literal -2 binary64) (.f64 a c))) b))
#s(approx (- (* a (/ c b)) b) (/.f64 (+.f64 (neg.f64 (.f64 b b)) (.f64 a c)) b))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
#s(approx (* b b) (*.f64 b b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 b (+.f64 (/.f64 #s(literal 2 binary64) (.f64 a #s(literal -4 binary64))) (.f64 (.f64 #s(literal 2 binary64) b) (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))))) (.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (.f64 b (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal -2 binary64) b) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 a a) c) #s(literal 16 binary64))) (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))))))) (.f64 #s(literal -2 binary64) (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 2 binary64) (.f64 a #s(literal -4 binary64))))) (.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (+.f64 (.f64 b (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) b))
#s(approx (/ b c) (/.f64 b c))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) (/.f64 #s(literal 1/2 binary64) a))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) a))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) (pow.f64 a #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (.f64 b (-.f64 (.f64 b (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 3 binary64)))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) (neg.f64 b)))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 b (-.f64 (.f64 b (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64)))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5/2 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (.f64 a c))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))))) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64)))))
#s(approx (- (* b b) (* (* a 4) c)) (-.f64 (.f64 b b) (.f64 (*.f64 #s(literal 4 binary64) a) c)))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (+.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))) #s(literal -5/2 binary64)) (pow.f64 b #s(literal 6 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)) #s(literal 2 binary64))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a c) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 b (-.f64 (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 b (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (+.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 a (pow.f64 b #s(literal 6 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (*.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 b (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)) #s(literal 2 binary64))))
#s(approx (- (* a (/ c b)) b) (.f64 b (-.f64 (.f64 a (/.f64 c (*.f64 b b))) #s(literal 1 binary64))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (+.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 c #s(literal 4 binary64))) #s(literal -5/2 binary64)) (pow.f64 b #s(literal 6 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))))) b))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 b (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) b)
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 b (+.f64 (/.f64 (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64))) b) #s(literal 1 binary64))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (/.f64 b c))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (.f64 b (+.f64 (pow.f64 c #s(literal -1 binary64)) (/.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) b))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (+.f64 (+.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 a (pow.f64 b #s(literal 6 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))))) b))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 c (.f64 a (ratio-of-squares.f64 c b)))) b))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 c (*.f64 a (ratio-of-squares.f64 c b))))) b))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 c (.f64 a (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 a (pow.f64 b #s(literal 6 binary64))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))))) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))))) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (*.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 b (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 b (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 b (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 a c)) (*.f64 b b)) #s(literal 1 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (neg.f64 b) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 c c)))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (neg.f64 c) (.f64 b b))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (+.f64 (-.f64 (neg.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 (.f64 a a) c))) (neg.f64 (.f64 (.f64 a c) (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 c c)))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 c c)))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (neg.f64 c) (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (.f64 a (/.f64 c b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))) (.f64 #s(literal -2 binary64) (*.f64 a c))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))))) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 b) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 b) (+.f64 (+.f64 (neg.f64 (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (.f64 b b)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (+.f64 (neg.f64 (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (*.f64 b b))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 2 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 b) (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (- (* a (/ c b)) b) (.f64 (neg.f64 b) (+.f64 (neg.f64 (.f64 a (/.f64 c (*.f64 b b)))) #s(literal 1 binary64))))
#s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))) (neg.f64 b))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (neg.f64 b) a))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 (neg.f64 b) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 a (.f64 c c)) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (.f64 b b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 (neg.f64 b) (+.f64 (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (+.f64 (neg.f64 (.f64 a (.f64 c (.f64 (.f64 a (.f64 c c)) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (.f64 (.f64 a a) c))) (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64)))) (pow.f64 b #s(literal 6 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 a (*.f64 c c)) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 #s(literal 2 binary64) (.f64 a (/.f64 c b))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b))))) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a c) (.f64 (.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (*.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b)))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (sqrt.f64 (.f64 (*.f64 a c) #s(literal -4 binary64))) b)) #s(literal 1 binary64))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) b)) (pow.f64 c #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (/.f64 (neg.f64 b) a))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 (neg.f64 b) (+.f64 (+.f64 (neg.f64 (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (.f64 b b)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (+.f64 (neg.f64 (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (pow.f64 a #s(literal -1 binary64))) (/.f64 (neg.f64 c) (*.f64 b b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.f64 #s(literal -2 binary64) (/.f64 b a)))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 (neg.f64 b) (+.f64 (/.f64 #s(literal 2 binary64) a) (.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 (neg.f64 b) (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (/.f64 #s(literal 2 binary64) a)) (.f64 #s(literal -2 binary64) (/.f64 c (.f64 b b))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 a (ratio-of-squares.f64 c (.f64 b b)))) (/.f64 #s(literal 2 binary64) a)) (.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 2 binary64))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 b) (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 (neg.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) a) c) (.f64 b b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 (neg.f64 b) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 (neg.f64 b) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 (.f64 a c) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (.f64 a (/.f64 c (.f64 b b))) (.f64 (.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (neg.f64 (.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (+.f64 (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 a a) c)) (pow.f64 b #s(literal 5 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 c (+.f64 (.f64 (.f64 #s(literal 2 binary64) c) (.f64 (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))))) (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* 2 c) (*.f64 #s(literal 2 binary64) c))
#s(approx c c)
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 c (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) c)) (pow.f64 b #s(literal 3 binary64))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (.f64 #s(literal 2 binary64) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (.f64 c (-.f64 (.f64 c (-.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64))))))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (.f64 c (+.f64 (.f64 c (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) b))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (neg.f64 (.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 c (+.f64 (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 a a) c)) (pow.f64 b #s(literal 5 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 c (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 c (+.f64 (.f64 c (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 c (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (neg.f64 (.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 c (+.f64 (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 a a) c)) (pow.f64 b #s(literal 5 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 c (+.f64 (.f64 (.f64 #s(literal 2 binary64) c) (.f64 (ratio-of-squares.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 b #s(literal 7/2 binary64))) #s(literal -5/2 binary64))) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))))) (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* -2 c) (*.f64 #s(literal -2 binary64) c))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64))))))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (.f64 c (+.f64 (.f64 c (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (/.f64 (+.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) b) c))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (neg.f64 (.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (.f64 c (+.f64 (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 a a) c)) (pow.f64 b #s(literal 5 binary64))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (neg.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (-.f64 (/.f64 (.f64 #s(literal -2 binary64) (*.f64 a c)) (pow.f64 b #s(literal 3 binary64))) (/.f64 #s(literal 2 binary64) b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (-.f64 (.f64 c (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 a a) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (/.f64 #s(literal 2 binary64) b))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (-.f64 (.f64 c (+.f64 (.f64 c (-.f64 (.f64 #s(literal -4 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 c a) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (*.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 b #s(literal 3 binary64)))))) (/.f64 #s(literal 2 binary64) b))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64))))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 c (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 c (+.f64 (.f64 c (-.f64 (/.f64 (.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 c (/.f64 (.f64 (ratio-of-squares.f64 (.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) b))))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 c (.f64 #s(literal -2 binary64) (+.f64 (/.f64 a b) (.f64 (.f64 a a) (/.f64 c (pow.f64 b #s(literal 3 binary64))))))) b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (.f64 c (+.f64 (.f64 c (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64))) (.f64 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))))) (.f64 #s(literal -2 binary64) (/.f64 a b)))) b))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (+.f64 (neg.f64 (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (.f64 c c))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64))) (neg.f64 (.f64 (sqrt.f64 (/.f64 c a)) (.f64 b (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (sqrt.f64 #s(literal -4 binary64))))))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 c (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 7 binary64)))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c)))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c)) (.f64 (.f64 #s(literal 1/4 binary64) (pown3/2s.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 c (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c)) (.f64 (.f64 #s(literal -1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pown3/2s.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c)))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 c (-.f64 (.f64 #s(literal -2 binary64) (/.f64 b c)) (*.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (- (* a (/ c b)) b) (*.f64 c (+.f64 (/.f64 (neg.f64 b) c) (/.f64 a b))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (+.f64 (neg.f64 (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (.f64 c c))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (-.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (ratio-of-squares.f64 (pow.f64 b #s(literal 3/2 binary64)) a) (/.f64 (.f64 c c) #s(literal 16 binary64))) (neg.f64 (.f64 (sqrt.f64 (/.f64 c a)) (.f64 b (/.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (sqrt.f64 #s(literal -4 binary64))))))) (pow.f64 c #s(literal 3 binary64)))) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1 binary64)) (.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (/.f64 b c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c)) (.f64 (.f64 #s(literal 1/4 binary64) (pown3/2s.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 c (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c)) (.f64 (.f64 #s(literal -1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pown3/2s.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (+.f64 (/.f64 (neg.f64 b) (.f64 a c)) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pown3/2s.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64)))) (/.f64 (neg.f64 b) (.f64 a c)))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 c (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (pow.f64 (.f64 a c) #s(literal 5 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pown3/2s.f64 (.f64 a c))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))) (/.f64 (neg.f64 b) (*.f64 a c)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 b c)))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 c (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 c (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 c (+.f64 (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 7 binary64)))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 c (-.f64 (/.f64 (.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 b a))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 b (/.f64 c a)))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) b) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (/.f64 c (.f64 a a))))) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))) c)) (.f64 #s(literal -1/2 binary64) (.f64 b (/.f64 c a)))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (/.f64 b c) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) b) c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/64 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) b) c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 c) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (.f64 (neg.f64 c) (+.f64 (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 7 binary64)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))) (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 b a) c)) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64))))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (* 1/2 (sqrt (* (/ c a) -4))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (sqrt (* (/ c a) -4)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* 2 (- (* a (/ c b)) b)) (.f64 (neg.f64 c) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 a b)) (*.f64 #s(literal -2 binary64) (/.f64 b c)))))
#s(approx (- (* a (/ c b)) b) (*.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 a b)) (/.f64 b c))))
#s(approx (- (* b b) (* (* 4 a) c)) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 b a))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 b (/.f64 c a)))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c))) b) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 b #s(literal 3 binary64)) (/.f64 c (.f64 a a))))) (.f64 (.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))) c)) (.f64 #s(literal -1/2 binary64) (.f64 b (/.f64 c a)))) c)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 c) (-.f64 (/.f64 (neg.f64 b) c) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 b (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (*.f64 a c) #s(literal -1 binary64)))))
#s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 (neg.f64 c) (+.f64 (/.f64 (neg.f64 b) c) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ b c)) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c)))
#s(approx (sqrt (* (/ a c) -4)) (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 b a) c)) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (* (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) 1/2) (.f64 (neg.f64 c) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64))))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) (.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (.f64 (pow.f64 (.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))) (/.f64 (/.f64 b a) c))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (neg.f64 b) a) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (/ (- (sqrt (- (* b b) (* (* a 4) c))) b) a) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (.f64 #s(literal -1 binary64) (+.f64 (/.f64 b a) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 5 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 c (pow.f64 a #s(literal 3 binary64))))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c))) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 b c))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 a c)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64))))) c)) b) c)) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 (neg.f64 c) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 (neg.f64 c) (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (.f64 (neg.f64 c) (+.f64 (+.f64 (.f64 #s(literal 1/512 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 c #s(literal 7 binary64)))) (.f64 (pow.f64 b #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (.f64 a (pow.f64 c #s(literal 3 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64)))))) (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 3 binary64))) (pow.f64 c #s(literal 5 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (- (* b b) (* (* a 4) c)) (.f64 (neg.f64 c) (-.f64 (neg.f64 (/.f64 (.f64 b b) c)) (*.f64 #s(literal -4 binary64) a))))

eval278.0ms (4.9%)

Memory

-19.5MiB live, 265.1MiB allocated; 29ms collecting garbage

Samples

91.0ms	2 344×	0	invalid
45.0ms	984×	0	valid

Compiler

Compiled 61 227 to 3 456 computations (94.4% saved)

Precisions

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

ival-mult: 42.0ms (63.6% of total)

ival-div: 13.0ms (19.7% of total)

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

ival-true: 2.0ms (3% of total)

adjust: 1.0ms (1.5% of total)

ival-sqrt: 1.0ms (1.5% of total)

ival-assert: 1.0ms (1.5% of total)

exact: 0.0ms (0% of total)

prune84.0ms (1.5%)

Memory

0.9MiB live, 95.2MiB allocated; 4ms collecting garbage

Pruning

17 alts after pruning (15 fresh and 2 done)

	Pruned	Kept	Total
New	740	11	751
Fresh	4	4	8
Picked	4	1	5
Done	0	1	1
Total	748	17	765

Accuracy

100.0%

Counts

765 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
	24.7%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
	49.6%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)))) (.f64 #s(literal 2 binary64) a)))
✓	73.3%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
	50.7%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
	40.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
	46.1%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
	44.9%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
✓	62.4%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
	24.7%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
	46.0%	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
	70.4%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
	35.9%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
	39.8%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
	45.7%	(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
	40.4%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
	50.8%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) #s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 b (+.f64 (/.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) b) #s(literal 1 binary64)))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
	51.8%	#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))))))))

Samples

29.0ms

768×

valid

Compiler

Compiled 3 825 to 905 computations (76.3% saved)

Precisions

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

ival-mult: 10.0ms (66.5% of total)

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

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

adjust: 0.0ms (0% of total)

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

regimes49.0ms (0.9%)

Memory

-3.5MiB live, 43.5MiB allocated; 2ms collecting garbage

Counts

48 → 3

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c))))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 #s(approx (/ (- (sqrt (- ( b b) (* (* a 4) c))) b) a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))) (.f64 (/.f64 b a) #s(literal -1/2 binary64)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (+ c c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (-.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) #s(approx (* c (+ (sqrt (* (/ a c) -4)) (/ b c))) (.f64 b (+.f64 (/.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64))) b) #s(literal 1 binary64)))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c (+.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64)))) c))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 (neg.f64 c) (+.f64 (.f64 (sqrt.f64 (.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)))) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) a) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (/.f64 (-.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) (.f64 b b)) (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (.f64 c (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 b (.f64 a c))) (sqrt.f64 (.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 1 binary64))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)) #s(literal 3/2 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c)))) (-.f64 (.f64 b b) (.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))))) (.f64 #s(literal 2 binary64) a)))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)) (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b)) (*.f64 #s(literal 2 binary64) a)))

Calls

4 calls:

12.0ms	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
11.0ms	c
11.0ms	a
11.0ms	b

Results

Accuracy	Segments	Branch
93.6%	5	`(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))`
79.5%	3	`a`
93.6%	3	`b`
81.4%	4	`c`

Compiler

Compiled 41 to 29 computations (29.3% saved)

regimes9.0ms (0.2%)

Memory

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

Counts

26 → 4

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c))))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 #s(approx (/ (- (sqrt (- ( b b) (* (* a 4) c))) b) a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 1/2 binary64))))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (*.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))

Calls

1 calls:

7.0ms

Results

Accuracy	Segments	Branch
93.6%	4	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.2%)

Memory

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

Counts

24 → 3

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c)))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c))))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 #s(literal -4 binary64) (.f64 a c)))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -1 binary64)))) (.f64 #s(literal -1/2 binary64) b)) a))) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

#s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (*.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a c)))))))))

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b)) (*.f64 #s(literal 2 binary64) a)))

Calls

2 calls:

6.0ms

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)))

Results

Accuracy	Segments	Branch
83.3%	5	`(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))`
90.3%	3	`b`

Compiler

Compiled 39 to 23 computations (41% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

20 → 4

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))

Calls

1 calls:

5.0ms

Results

Accuracy	Segments	Branch
87.2%	4	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

19 → 4

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))

Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))

Calls

1 calls:

5.0ms

Results

Accuracy	Segments	Branch
86.9%	4	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.2%)

Memory

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

Counts

18 → 2

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (+.f64 c c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a c) b)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (.f64 a (/.f64 c b)))))) (/.f64 (+.f64 (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b))) (neg.f64 b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) #s(approx (- ( a (/ c b)) b) (/.f64 (.f64 a c) b))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- ( b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a)))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a)))

Calls

1 calls:

5.0ms

Results

Accuracy	Segments	Branch
80.0%	2	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes15.0ms (0.3%)

Memory

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

Counts

12 → 2

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -4 binary64))))))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))

Calls

4 calls:

3.0ms	b
3.0ms	c
3.0ms	a
3.0ms	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))

Results

Accuracy	Segments	Branch
73.3%	1	`a`
73.3%	1	`c`
73.3%	1	`(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))`
77.4%	2	`b`

Compiler

Compiled 41 to 29 computations (29.3% saved)

regimes4.0ms (0.1%)

Memory

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

Counts

9 → 2

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))

Calls

1 calls:

3.0ms

Results

Accuracy	Segments	Branch
75.4%	2	`b`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

8 → 1

Calls

Call 1

Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (.f64 #s(literal -1 binary64) (/.f64 b a))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (.f64 a (ratio-of-squares.f64 c b)))) b)) (/.f64 #s(approx (+ (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (neg.f64 c) (neg.f64 (*.f64 a (ratio-of-squares.f64 c b)))) b)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (sqrt.f64 (.f64 (/.f64 c a) #s(literal -1 binary64)))) (/.f64 (+.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) (neg.f64 b))) (*.f64 #s(literal 2 binary64) a)))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) b)) (*.f64 #s(literal 2 binary64) a)))

Calls

2 calls:

3.0ms	c
3.0ms	b

Results

Accuracy	Segments	Branch
73.3%	1	`c`
73.3%	1	`b`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes5.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

2 → 1

Calls

Call 1

Inputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (/.f64 b a))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a))))

Outputs

(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

Calls

4 calls:

1.0ms	(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))
1.0ms	a
1.0ms	c
1.0ms	b

Results

Accuracy	Segments	Branch
35.9%	1	`a`
35.9%	1	`(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c))))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 #s(literal 4 binary64) a) c)))) (.f64 #s(literal 2 binary64) a)))`
35.9%	1	`b`
35.9%	1	`c`

Compiler

Compiled 41 to 29 computations (29.3% saved)

bsearch25.0ms (0.4%)

Memory

-28.0MiB live, 19.4MiB allocated; 1ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	predicate-same

Steps

Time	Left	Right
5.0ms	1.2853456841713682e+152	6.863620763385183e+152
17.0ms	-2.789660264766277e+108	-3.0412273227070854e+104

Samples

15.0ms	144×	0	valid
0.0ms	3×	0	invalid

Compiler

Compiled 1 140 to 604 computations (47% saved)

Precisions

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

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

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

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

ival-if: 1.0ms (8.8% of total)

ival-sub: 1.0ms (8.8% of total)

ival-sqrt: 1.0ms (8.8% of total)

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

adjust: 0.0ms (0% of total)

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

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

ival->=: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

bsearch54.0ms (0.9%)

Memory

-5.2MiB live, 41.3MiB allocated; 2ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough
1×	predicate-same

Steps

Time	Left	Right
3.0ms	1.2853456841713682e+152	6.863620763385183e+152
40.0ms	-8.146826575118541e-301	5.5163520799825144e-306
2.0ms	-2.789660264766277e+108	-3.0412273227070854e+104

Samples

18.0ms	176×	0	valid
13.0ms	134×	0	invalid

Compiler

Compiled 3 502 to 1 842 computations (47.4% saved)

Precisions

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

ival-mult: 9.0ms (40.5% of total)

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

ival-sub: 3.0ms (13.5% of total)

ival-sqrt: 2.0ms (9% of total)

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

ival-if: 1.0ms (4.5% of total)

ival->=: 1.0ms (4.5% of total)

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

bsearch40.0ms (0.7%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.2853456841713682e+152	6.863620763385183e+152
34.0ms	-4.193672248846343e-157	-4.455051301906326e-174

Samples

16.0ms	160×	0	valid
9.0ms	88×	0	invalid

Compiler

Compiled 2 031 to 965 computations (52.5% saved)

Precisions

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

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

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

ival-sub: 2.0ms (11.2% of total)

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

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

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

ival->=: 1.0ms (5.6% 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)

bsearch58.0ms (1%)

Memory

0.8MiB live, 48.2MiB allocated; 2ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
15.0ms	9.170276879597249e-73	2.318028563110098e-72
34.0ms	-1.813230621154359e-292	-8.146826575118541e-301
2.0ms	-4.193672248846343e-157	-4.455051301906326e-174

Samples

24.0ms	224×	0	valid
12.0ms	121×	0	invalid

Compiler

Compiled 2 374 to 1 378 computations (42% saved)

Precisions

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

ival-mult: 11.0ms (41.6% of total)

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

ival-sub: 3.0ms (11.3% of total)

ival-sqrt: 2.0ms (7.6% of total)

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

ival-if: 1.0ms (3.8% of total)

ival->=: 1.0ms (3.8% of total)

exact: 1.0ms (3.8% of total)

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

adjust: 0.0ms (0% of total)

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

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

bsearch5.0ms (0.1%)

Memory

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

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	9.170276879597249e-73	2.318028563110098e-72
2.0ms	-1.813230621154359e-292	-8.146826575118541e-301
1.0ms	-4.193672248846343e-157	-4.455051301906326e-174

Compiler

Compiled 2 334 to 1 358 computations (41.8% saved)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-4.193672248846343e-157	-4.455051301906326e-174

Compiler

Compiled 991 to 556 computations (43.9% saved)

bsearch36.0ms (0.6%)

Memory

-22.6MiB live, 27.3MiB allocated; 2ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
31.0ms	-4.455051301906326e-174	-3.617390959838422e-183

Samples

15.0ms	144×	0	valid
9.0ms	70×	0	invalid

Compiler

Compiled 905 to 521 computations (42.4% saved)

Precisions

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

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

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

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

ival-sub: 2.0ms (11.6% of total)

ival-if: 1.0ms (5.8% of total)

ival-sqrt: 1.0ms (5.8% of total)

ival->=: 1.0ms (5.8% of total)

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

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch37.0ms (0.7%)

Memory

-19.1MiB live, 27.7MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
30.0ms	-4.193672248846343e-157	-4.455051301906326e-174

Samples

14.0ms	144×	0	valid
7.0ms	73×	0	invalid

Compiler

Compiled 1 081 to 636 computations (41.2% saved)

Precisions

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

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

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

ival-sub: 2.0ms (12.9% of total)

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

ival-if: 1.0ms (6.5% of total)

ival-sqrt: 1.0ms (6.5% of total)

ival->=: 1.0ms (6.5% of total)

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

simplify55.0ms (1%)

Memory

3.1MiB live, 50.0MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	153	1495
1	235	1495
2	394	1495
3	802	1483
4	2371	1483

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 b #s(literal -2499999999999999954627176797099951966179412741082042811989599592474768138595013324551450856098284419065839616 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal 200000000000000009250216271808398948002452544790145376983777454402545107507559301846766839764406850263979324900979381181838795379032883593269504018219008 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))))
(if (<=.f64 b #s(literal -2499999999999999954627176797099951966179412741082042811989599592474768138595013324551450856098284419065839616 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))) (if (<=.f64 b #s(literal 149999999999999995308242615126588962212658482384536483079571319804819866126826289494846520008938364478927682255517486914178750834015815758398501955829760 binary64)) #s(approx (if (>= b 0) (/ ( 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal 149999999999999995308242615126588962212658482384536483079571319804819866126826289494846520008938364478927682255517486914178750834015815758398501955829760 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -5127248624301375/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) a))) (if (<=.f64 b #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -5127248624301375/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) a))) (if (<=.f64 b #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a))))
(if (<=.f64 b #s(literal -1240983847993237/36499524940977561749129372845602330599145828057988479444633540143194201337669419092047302490538971198229138476588755258485509637771003503986021290557777713506015957394882119600662993537972830208 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))
(if (<=.f64 b #s(literal -3480865949723965/1087770609288739018116276647019455748771006705104961378712461595034426490595025393129804804639189577049885346787832834079429794483512744426310696916513970896780966442670885312576979206144 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

Outputs
(if (<=.f64 b #s(literal -2499999999999999954627176797099951966179412741082042811989599592474768138595013324551450856098284419065839616 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal 200000000000000009250216271808398948002452544790145376983777454402545107507559301846766839764406850263979324900979381181838795379032883593269504018219008 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))))
(if (<=.f64 b #s(literal -2499999999999999954627176797099951966179412741082042811989599592474768138595013324551450856098284419065839616 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal 200000000000000009250216271808398948002452544790145376983777454402545107507559301846766839764406850263979324900979381181838795379032883593269504018219008 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b)) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))))
(if (<=.f64 b #s(literal -2499999999999999954627176797099951966179412741082042811989599592474768138595013324551450856098284419065839616 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))) (if (<=.f64 b #s(literal 149999999999999995308242615126588962212658482384536483079571319804819866126826289494846520008938364478927682255517486914178750834015815758398501955829760 binary64)) #s(approx (if (>= b 0) (/ ( 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -2499999999999999954627176797099951966179412741082042811989599592474768138595013324551450856098284419065839616 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal -2 binary64) c) #s(approx (+ (sqrt (- ( b b) (* (* a 4) c))) b) (.f64 c #s(approx (+ (sqrt ( (/ a c) -4)) (/ b c)) (sqrt.f64 (.f64 (/.f64 a c) #s(literal -4 binary64))))))) (.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 b b) (.f64 (.f64 a #s(literal 4 binary64)) c))) b) a) #s(literal 1/2 binary64)))) (if (<=.f64 b #s(literal 149999999999999995308242615126588962212658482384536483079571319804819866126826289494846520008938364478927682255517486914178750834015815758398501955829760 binary64)) #s(approx (if (>= b 0) (/ ( 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal 149999999999999995308242615126588962212658482384536483079571319804819866126826289494846520008938364478927682255517486914178750834015815758398501955829760 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal 149999999999999995308242615126588962212658482384536483079571319804819866126826289494846520008938364478927682255517486914178750834015815758398501955829760 binary64)) #s(approx (if (>= b 0) (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))) #s(approx (if (>= b 0) (/ (* -2 c) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) (* (/ (/ (- (- (* b b) (* (* a 4) c)) (* b b)) (+ (sqrt (- (* b b) (* (* a 4) c))) b)) a) 1/2)) (.f64 #s(literal -2 binary64) (/.f64 c (+.f64 b (sqrt.f64 (-.f64 (.f64 b b) (.f64 #s(literal 4 binary64) (.f64 a c))))))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -5127248624301375/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) a))) (if (<=.f64 b #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -5127248624301375/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) a))) (if (<=.f64 b #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- ( b b) (* (* 4 a) c)))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 a (/.f64 c b)) b)))) (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (.f64 b b)))) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -5127248624301375/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) a))) (if (<=.f64 b #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (<=.f64 b #s(literal -5127248624301375/6032057205060440848842124543157735677050252251748505781796615064961622344493727293370973578138265743708225425014400837164813540499979063179105919597766951022193355091707896034850684039059079180396788349106095584290087446076413771468940477241550670753145517602931224392424029547429993824129889235158145614364972941312 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (.f64 #s(literal 2 binary64) a))) (if (<=.f64 b #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a))))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a))))
(if (<=.f64 b #s(literal -396115096109269/966134380754314586173837972732996836074731832426608749664308812862879785572390106134048441645480644490615904007875544294341269665260746913935727168366770187174245203705856 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (.f64 (.f64 a c) #s(literal -4 binary64)))) (*.f64 #s(literal 2 binary64) a))))
(if (<=.f64 b #s(literal -1240983847993237/36499524940977561749129372845602330599145828057988479444633540143194201337669419092047302490538971198229138476588755258485509637771003503986021290557777713506015957394882119600662993537972830208 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))
(if (<=.f64 b #s(literal -1240983847993237/36499524940977561749129372845602330599145828057988479444633540143194201337669419092047302490538971198229138476588755258485509637771003503986021290557777713506015957394882119600662993537972830208 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))
(if (<=.f64 b #s(literal -3480865949723965/1087770609288739018116276647019455748771006705104961378712461595034426490595025393129804804639189577049885346787832834079429794483512744426310696916513970896780966442670885312576979206144 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))
(if (<=.f64 b #s(literal -3480865949723965/1087770609288739018116276647019455748771006705104961378712461595034426490595025393129804804639189577049885346787832834079429794483512744426310696916513970896780966442670885312576979206144 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* 1/2 (sqrt (* (/ c a) -4))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) c) (-.f64 (neg.f64 b) #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 c)) (+.f64 b #s(approx (sqrt (- ( b b) (* (* 4 a) c))) b))) (/.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (.f64 #s(literal -2 binary64) b)) (.f64 #s(literal 2 binary64) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (* 2 c) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)) #s(approx (/ (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (neg.f64 b) a)))

derivations251.0ms (4.4%)

Memory

30.7MiB live, 129.2MiB allocated; 2ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 495 to 161 computations (89.2% saved)

preprocess55.0ms (1%)

Memory: -23.3MiB live, 70.8MiB allocated; 7ms collecting garbage
Compiler: Compiled 3 066 to 362 computations (88.2% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze220.0ms (3.9%)

sample1.4s (24.7%)

explain375.0ms (6.6%)

preprocess206.0ms (3.6%)

eval0.0ms (0%)

prune1.0ms (0%)

series49.0ms (0.9%)

rewrite213.0ms (3.7%)

eval272.0ms (4.8%)

prune45.0ms (0.8%)

series78.0ms (1.4%)

rewrite214.0ms (3.8%)

eval550.0ms (9.7%)

prune63.0ms (1.1%)

series79.0ms (1.4%)

rewrite208.0ms (3.7%)

eval313.0ms (5.5%)

prune38.0ms (0.7%)

series64.0ms (1.1%)

rewrite186.0ms (3.3%)

eval278.0ms (4.9%)

prune84.0ms (1.5%)

regimes49.0ms (0.9%)

regimes9.0ms (0.2%)

regimes13.0ms (0.2%)

regimes7.0ms (0.1%)

regimes6.0ms (0.1%)

regimes13.0ms (0.2%)

regimes15.0ms (0.3%)

regimes4.0ms (0.1%)

regimes6.0ms (0.1%)

regimes5.0ms (0.1%)

bsearch25.0ms (0.4%)

bsearch54.0ms (0.9%)

bsearch40.0ms (0.7%)

bsearch58.0ms (1%)

bsearch5.0ms (0.1%)

bsearch2.0ms (0%)

bsearch36.0ms (0.6%)

bsearch37.0ms (0.7%)

simplify55.0ms (1%)

derivations251.0ms (4.4%)

preprocess55.0ms (1%)

end0.0ms (0%)

Profiling