jeff quadratic root 1

Time bar (total: 6.9s)

start0.0ms (0%)

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

analyze467.0ms (6.8%)

Memory
19.7MiB live, 205.6MiB allocated; 654ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
12.5%12.5%87.4%0.1%0%0%0%4
18.8%18.7%81.1%0.1%0%0%0%5
31.3%31.2%68.6%0.1%0%0%0%6
33.3%31.2%62.4%0.1%0%6.2%0%7
39.2%36.7%56.9%0.1%0%6.2%0%8
50.4%46%45.2%0.1%0%8.6%0%9
55.6%48.2%38.4%0.1%0%13.3%0%10
61.5%52.8%33.1%0.1%0%14%0%11
69.5%58%25.5%0.1%0%16.4%0%12
Compiler

Compiled 40 to 22 computations (45% saved)

sample1.5s (21.3%)

Memory
14.6MiB live, 1 644.8MiB allocated; 351ms collecting garbage
Samples
819.0ms8 256×0valid
170.0ms999×0invalid
Precisions
Click to see histograms. Total time spent on operations: 606.0ms
ival-mult: 275.0ms (45.3% of total)
ival-sub: 94.0ms (15.5% of total)
ival-div: 75.0ms (12.4% of total)
ival-sqrt: 64.0ms (10.6% of total)
ival-neg: 55.0ms (9.1% of total)
ival-add: 22.0ms (3.6% of total)
exact: 11.0ms (1.8% of total)
ival-if: 4.0ms (0.7% 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

explain424.0ms (6.2%)

Memory
20.3MiB live, 497.8MiB allocated; 57ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1150-0-(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))
650-0-(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
470-0-(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
180-1(3.1601913479015056e-279 -1.0694072827497341e+99 3.484493649659532e+65)(/.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))
130-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)))))
70-0-(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))
10-0-(*.f64 (*.f64 #s(literal 4 binary64) a) c)
00-0-a
00-0-(*.f64 #s(literal 2 binary64) c)
00-0-(*.f64 b b)
00-0-(*.f64 #s(literal 2 binary64) a)
00-0-c
00-0-(*.f64 #s(literal 4 binary64) a)
00-0-(neg.f64 b)
00-0-(>=.f64 b #s(literal 0 binary64))
00-0-#s(literal 4 binary64)
00-0-(if (>=.f64 b #s(literal 0 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)) (/.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))))))
00-0-#s(literal 0 binary64)
00-0-#s(literal 2 binary64)
00-0-b
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f64(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))oflow-rescue1100
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))overflow110
(*.f64 #s(literal 4 binary64) a)overflow1
(*.f64 (*.f64 #s(literal 4 binary64) a) c)overflow34
(*.f64 b b)overflow91
+.f64(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))cancellation650
-.f64(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))cancellation470
/.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/n170
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))underflow31
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))underflow5
(*.f64 (*.f64 #s(literal 4 binary64) a) c)underflow35
(*.f64 b b)underflow44
/.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/u120
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))underflow5
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))underflow28
(*.f64 (*.f64 #s(literal 4 binary64) a) c)underflow35
(*.f64 b b)underflow44
-.f64(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))nan-rescue70
(*.f64 b b)overflow91
(*.f64 (*.f64 #s(literal 4 binary64) a) c)overflow34
(*.f64 #s(literal 4 binary64) a)overflow1
sqrt.f64(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))uflow-rescue50
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))underflow5
(*.f64 (*.f64 #s(literal 4 binary64) a) c)underflow35
(*.f64 b b)underflow44
/.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)))))o/n10
(*.f64 #s(literal 2 binary64) c)overflow1
*.f64(*.f64 (*.f64 #s(literal 4 binary64) a) c)n*o10
Confusion
Predicted +Predicted -
+810
-11164
Precision
0.421875
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+8100
-111064
Precision?
0.421875
Recall?
1.0
Freqs
test
numberfreq
064
1127
257
38
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
75.0ms154×2valid
37.0ms150×1valid
34.0ms172×0valid
16.0ms36×3valid
Compiler

Compiled 332 to 64 computations (80.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 115.0ms
adjust: 44.0ms (38.4% of total)
ival-mult: 20.0ms (17.5% of total)
ival-div: 15.0ms (13.1% of total)
ival-sub: 10.0ms (8.7% of total)
ival-sqrt: 9.0ms (7.9% of total)
ival-if: 5.0ms (4.4% of total)
ival-add: 5.0ms (4.4% of total)
ival-neg: 4.0ms (3.5% of total)
ival->=: 2.0ms (1.7% of total)
exact: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess224.0ms (3.3%)

Memory
27.8MiB live, 167.6MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
085393
1219381
2525381
31044379
42218373
57589373
02038
03338
15738
212238
325838
450338
5150538
6780838
0807338
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
Outputs
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (neg.f64 b))))
Compiler

Compiled 38 to 20 computations (47.4% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
69.8%
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
Compiler

Compiled 38 to 20 computations (47.4% saved)

series87.0ms (1.3%)

Memory
-18.8MiB live, 117.2MiB allocated; 36ms collecting garbage
Counts
20 → 172
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 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)) (/.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 b #s(literal 0 binary64))
b
#s(literal 0 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))
(-.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
c
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 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)
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
Outputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) 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 (- (* 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 (* 2 a) #s(hole binary64 (* 2 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (/ (- (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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (/ (* 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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (/ (- (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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 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 (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 (/ (* 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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) 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 (* -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 (/ (* 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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#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 c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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:

TimeVariablePointExpression
15.0ms
b
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (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 c (* 2 a) 2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))
7.0ms
a
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (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 c (* 2 a) 2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))
6.0ms
a
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (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 c (* 2 a) 2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))
5.0ms
a
@0
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (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 c (* 2 a) 2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))
5.0ms
b
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (- (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 c (* 2 a) 2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))

rewrite231.0ms (3.3%)

Memory
5.4MiB live, 278.0MiB allocated; 43ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010998075
011207270
166027164
088447052
Stop Event
iter limit
node limit
iter limit
Counts
192 → 234
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 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)) (/.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 b #s(literal 0 binary64))
b
#s(literal 0 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))
(-.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
c
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 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)
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) 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 (- (* 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 (* 2 a) #s(hole binary64 (* 2 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (/ (- (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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (/ (* 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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (/ (- (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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 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 (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 (/ (* 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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) 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 (* -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 (/ (* 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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#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 c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 #s(literal 2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c)))) #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 (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)
(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 c a)) (*.f64 #s(literal -4 binary64) (*.f64 c a))) (pow.f64 b #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 b b)))
(/.f64 (-.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (*.f64 c a) #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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 #s(literal -4 binary64) (*.f64 c a))) (-.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 b b)))))
(-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))
(+.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.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 c a)))
(*.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 c a) #s(literal 4 binary64))
(*.f64 (*.f64 a #s(literal 4 binary64)) c)
(*.f64 c (*.f64 a #s(literal 4 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 c a))
(*.f64 a #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
a
c
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(+.f64 a a)
#s(literal 2 binary64)
(*.f64 (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))))
(/.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))) (neg.f64 b))))
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b)))
(+.f64 (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))) (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (neg.f64 b))))
(*.f64 #s(literal 2 binary64) c)
(*.f64 c #s(literal 2 binary64))
(+.f64 c c)
(/.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 (-.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 (+.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 (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))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) 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 (+.f64 (/.f64 (*.f64 c a) b) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.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 c b)) a) (neg.f64 b)) a))
#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 c a) 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 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) 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 (*.f64 c a) b) #s(literal 2 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) 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 (* 2 a) (*.f64 #s(literal 2 binary64) 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 (+.f64 (/.f64 (*.f64 c a) b) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (+.f64 (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64))) (*.f64 (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) c)) #s(literal -1/8 binary64))) (neg.f64 (*.f64 c (/.f64 (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 b b))))) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))) a) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -1/2 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)))) (* 2 a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (*.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))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (-.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 #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)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#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 #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 (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#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 (*.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)))) (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 (*.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))) a))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (-.f64 (/.f64 (*.f64 b b) a) (*.f64 c #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 #s(literal -4 binary64) #s(literal -1/2 binary64))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (/.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)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (+.f64 (*.f64 (/.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)) #s(literal -2 binary64)) (*.f64 (/.f64 (+.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 (*.f64 (/.f64 (*.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))) #s(literal 1/2 binary64))) (pow.f64 a #s(literal 3 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#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 (*.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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c a) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -1/2 binary64) b)) a)) (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 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.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))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 c a) #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 c a) #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 c a) #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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (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 (sqrt.f64 (*.f64 (*.f64 c a) #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 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a b) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.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))) a)) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -1 binary64)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.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)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.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 (*.f64 (*.f64 a a) (/.f64 (pow.f64 b #s(literal 3 binary64)) c)) #s(literal 1/32 binary64))) a))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a b))) a)) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -1 binary64)))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 c a) #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 c a) #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 (/ (- (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 #s(literal -1/4 binary64) (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))) (*.f64 #s(literal -1/16 binary64) (*.f64 (ratio-of-squares.f64 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))))) 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 (neg.f64 b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 c a) #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 c a)))))
#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 c a))) (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 c a) #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 c a)))))
#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 c 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 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (*.f64 c a))) (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 c a) #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 c a)))))
#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 c a) #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 c a))) (pow.f64 #s(literal -4 binary64) #s(literal -3/2 binary64)))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 c a) #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 c a)))))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 c a))) (/.f64 (/.f64 b a) #s(literal -4 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 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) c) #s(literal 16 binary64))) (*.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 c a) #s(literal -1/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 #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 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (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 c a) #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 c a)))))
#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 c a))) (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 c a) #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 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) 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 6 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)) #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 c a) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 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 4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.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))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))) 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 c a) #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 a (/.f64 c (*.f64 b b))) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64)) c) a)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (*.f64 c a) #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))) #s(literal -2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c)))) 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))) (neg.f64 b)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 c b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (+.f64 c (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) a))) (+.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 a (ratio-of-squares.f64 c b)))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) b)))
#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 #s(literal -2 binary64) (*.f64 c a))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) #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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))
#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 c a) #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))))) (neg.f64 (/.f64 c b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (+.f64 (*.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 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 a (ratio-of-squares.f64 c b)))) 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 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.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 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 c a) #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 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 (+.f64 (*.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 (+.f64 (*.f64 (+.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) (/.f64 (neg.f64 b) a)))
#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 c c)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)) c) #s(literal -2 binary64)) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)) a) (*.f64 b b))) (*.f64 (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) (*.f64 a a))) #s(literal -1/8 binary64))) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) c) (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)))) c) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (* 2 c) (*.f64 #s(literal 2 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 c a))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64))))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (*.f64 c a) #s(literal -5 binary64)))) (ratio-of-squares.f64 (*.f64 b b) (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 c a))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/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))
#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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.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))))) (*.f64 c c))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 #s(literal -4 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 c a))) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.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))) (*.f64 (*.f64 b (/.f64 (*.f64 #s(literal -1 binary64) (*.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))))) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 c a)))) (pow.f64 c #s(literal 3 binary64)))) (-.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 (*.f64 #s(literal -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 #s(literal -4 binary64) #s(literal 3/4 binary64)))) (*.f64 (/.f64 (/.f64 b a) #s(literal -4 binary64)) #s(literal -2 binary64))) (*.f64 (ratio-of-squares.f64 b (pow.f64 #s(literal -4 binary64) #s(literal 3/4 binary64))) (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1/2 binary64)))))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 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)) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (/.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))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (/.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))) c)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.f64 (/.f64 b c) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64))) c)))
#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 c a) #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))) c)))
#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 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))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.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))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.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)) (*.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)))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.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)) (*.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))) c)))
#s(approx (- (* b b) (* (* 4 a) c)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (*.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)) c)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.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 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) (/.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))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) c)) (*.f64 a a)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1/2 binary64)) b) (*.f64 (*.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)) (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))) c)) (*.f64 (*.f64 b (/.f64 c a)) #s(literal -1/2 binary64))) c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)) c)))
#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 c a) #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))))) c)))
#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 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))))) c)))

eval359.0ms (5.2%)

Memory
18.1MiB live, 483.3MiB allocated; 162ms collecting garbage
Samples
194.0ms2 921×0invalid
47.0ms919×0valid
Compiler

Compiled 18 538 to 1 876 computations (89.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 127.0ms
ival-mult: 63.0ms (49.7% of total)
ival-div: 50.0ms (39.5% of total)
ival-pow: 6.0ms (4.7% of total)
ival-true: 3.0ms (2.4% of total)
ival-sqrt: 2.0ms (1.6% of total)
ival-assert: 2.0ms (1.6% of total)
adjust: 1.0ms (0.8% of total)
exact: 0.0ms (0% of total)

prune61.0ms (0.9%)

Memory
21.4MiB live, 111.8MiB allocated; 31ms collecting garbage
Pruning

11 alts after pruning (11 fresh and 0 done)

PrunedKeptTotal
New31511326
Fresh000
Picked101
Done000
Total31611327
Accuracy
99.8%
Counts
327 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
44.5%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (/.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 #s(literal 2 binary64) a)) (/.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))))))
68.5%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
49.3%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 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))))
68.3%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))))
52.1%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #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)))))
43.0%
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
48.4%
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
69.6%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.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))))))
42.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) (*.f64 (/.f64 b a) #s(literal -1/2 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))))))
41.4%
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.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))))))
69.8%
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
Compiler

Compiled 1 176 to 754 computations (35.9% saved)

series97.0ms (1.4%)

Memory
5.4MiB live, 152.6MiB allocated; 38ms collecting garbage
Counts
61 → 423
Calls
Call 1
Inputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 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)
(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 b b)
(*.f64 (*.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
a
#s(literal 4 binary64)
c
#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)
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.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)))
(*.f64 (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)
(/.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 (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 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.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 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(/.f64 c b)
(/.f64 (neg.f64 b) a)
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 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))
(-.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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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))
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
#s(literal 1/2 binary64)
(/.f64 b a)
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))
(*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))
(*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))
(*.f64 a (/.f64 c (*.f64 b b)))
(/.f64 c (*.f64 b b))
Outputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) 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 (/ (+ (* -2 (/ (* a c) b)) (* 2 b)) a)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))) a)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #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)))))))) 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 (+ (* -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 a #s(hole binary64 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (/ (- (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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) a)))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) #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 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (neg b) a) #s(hole binary64 (* -1 (/ b 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 (- (* 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 (* 2 a) #s(hole binary64 (* 2 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 (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -2 b)))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 2))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (+ 2 (* -2 (/ (* a c) (pow b 2))))))
#s(approx (* (* a (/ c (* b b))) 2) #s(hole binary64 (* 2 (/ (* a c) (pow b 2)))))
#s(approx (* a (/ c (* b b))) #s(hole binary64 (/ (* a c) (pow b 2))))
#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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* 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) a) #s(hole binary64 (+ (* -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))) 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 (/ (* 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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 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 (+ (* -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 (/ (- (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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* -2 (/ (* a c) (pow b 2)))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* a (- (* 2 (/ 1 a)) (* 2 (/ c (pow b 2)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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))) (/ b a))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -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 (/ (+ (* -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 (+ (* -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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) #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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (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)))) #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 (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* a (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 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 (+ 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) #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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (+ (* -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 (/ (- (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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 1/2 (/ 1 a)))))))
#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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (/ (- (* 2 (pow b 2)) (* 2 (* a c))) (pow b 2))))
#s(approx (/ c (* b b)) #s(hole binary64 (/ c (pow b 2))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* 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 (* 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 (* 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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) 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 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (/ (+ (* -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 (* -1 (/ (+ (* -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) 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 (/ (* 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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (/ (- (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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* b (+ (* -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 (- (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 (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* 2 (/ b a)))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* 2 (/ b a)) (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b)))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* 2 (/ b a)) (* 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) #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 c #s(hole binary64 c))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 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 (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)))) #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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* (sqrt (/ 1 (* a c))) (sqrt -4)) (/ b (* a c))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ 1 (* a c))) (sqrt -4)) (/ b (* a c)))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* 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)) (/ b (* a c))))))))
#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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (+ (* -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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* c (- (* 2 (/ 1 c)) (* 2 (/ a (pow b 2)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a 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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (/ b a)) 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 (/ (+ (* -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)) (/ b a)) c)) (* 2 (* (sqrt (/ 1 (* a c))) (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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) #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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* c (+ (* -2 (/ a (pow b 2))) (* 2 (/ 1 c))))))
Calls

9 calls:

TimeVariablePointExpression
20.0ms
a
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (>= b 0) b 0 (* (/ (+ (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)) (* b b) (* (* a 4) c) (* a 4) a 4 c -1/2 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (* 2 c) 2 (- (sqrt (- (* b b) (* (* a 4) c))) b) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (/ (* 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))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (neg b) a) (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) -1 (* 1/2 (/ b a)) 1/2 (/ b a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (- 2 (* (* a (/ c (* b b))) 2)) (* (* a (/ c (* b b))) 2) (* a (/ c (* b b))) (/ c (* b b)))
12.0ms
b
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (>= b 0) b 0 (* (/ (+ (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)) (* b b) (* (* a 4) c) (* a 4) a 4 c -1/2 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (* 2 c) 2 (- (sqrt (- (* b b) (* (* a 4) c))) b) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (/ (* 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))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (neg b) a) (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) -1 (* 1/2 (/ b a)) 1/2 (/ b a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (- 2 (* (* a (/ c (* b b))) 2)) (* (* a (/ c (* b b))) 2) (* a (/ c (* b b))) (/ c (* b b)))
11.0ms
a
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (>= b 0) b 0 (* (/ (+ (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)) (* b b) (* (* a 4) c) (* a 4) a 4 c -1/2 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (* 2 c) 2 (- (sqrt (- (* b b) (* (* a 4) c))) b) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (/ (* 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))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (neg b) a) (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) -1 (* 1/2 (/ b a)) 1/2 (/ b a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (- 2 (* (* a (/ c (* b b))) 2)) (* (* a (/ c (* b b))) 2) (* a (/ c (* b b))) (/ c (* b b)))
8.0ms
c
@0
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (>= b 0) b 0 (* (/ (+ (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)) (* b b) (* (* a 4) c) (* a 4) a 4 c -1/2 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (* 2 c) 2 (- (sqrt (- (* b b) (* (* a 4) c))) b) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (/ (* 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))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (neg b) a) (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) -1 (* 1/2 (/ b a)) 1/2 (/ b a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (- 2 (* (* a (/ c (* b b))) 2)) (* (* a (/ c (* b b))) 2) (* a (/ c (* b b))) (/ c (* b b)))
8.0ms
c
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (>= b 0) b 0 (* (/ (+ (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)) (* b b) (* (* a 4) c) (* a 4) a 4 c -1/2 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (* 2 c) 2 (- (sqrt (- (* b b) (* (* a 4) c))) b) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 (/ (* 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))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (neg b) a) (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) -1 (* 1/2 (/ b a)) 1/2 (/ b a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (- 2 (* (* a (/ c (* b b))) 2)) (* (* a (/ c (* b b))) 2) (* a (/ c (* b b))) (/ c (* b b)))

rewrite288.0ms (4.2%)

Memory
-84.1MiB live, 217.4MiB allocated; 87ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0163018980
0171617240
0818916987
Stop Event
iter limit
node limit
iter limit
Counts
484 → 568
Calls
Call 1
Inputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 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)
(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 b b)
(*.f64 (*.f64 a #s(literal 4 binary64)) c)
(*.f64 a #s(literal 4 binary64))
a
#s(literal 4 binary64)
c
#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)
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.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)))
(*.f64 (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)
(/.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 (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 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.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 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(/.f64 c b)
(/.f64 (neg.f64 b) a)
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 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))
(-.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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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))
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
#s(literal 1/2 binary64)
(/.f64 b a)
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))
(*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))
(*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64))
(*.f64 a (/.f64 c (*.f64 b b)))
(/.f64 c (*.f64 b b))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) 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 (/ (+ (* -2 (/ (* a c) b)) (* 2 b)) a)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (/ (+ (* 2 b) (* a (+ (* -2 (/ c b)) (* -2 (/ (* a (pow c 2)) (pow b 3)))))) a)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #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)))))))) 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 (+ (* -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 a #s(hole binary64 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (/ (- (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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) a)))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) #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 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (neg b) a) #s(hole binary64 (* -1 (/ b 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 (- (* 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 (* 2 a) #s(hole binary64 (* 2 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 (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -2 b)))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 2))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (+ 2 (* -2 (/ (* a c) (pow b 2))))))
#s(approx (* (* a (/ c (* b b))) 2) #s(hole binary64 (* 2 (/ (* a c) (pow b 2)))))
#s(approx (* a (/ c (* b b))) #s(hole binary64 (/ (* a c) (pow b 2))))
#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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (+ (* (sqrt (/ c a)) (sqrt -4)) (/ b a))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* 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) a) #s(hole binary64 (+ (* -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))) 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 (/ (* 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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 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 (+ (* -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 (/ (- (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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* -2 (/ (* a c) (pow b 2)))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* a (- (* 2 (/ 1 a)) (* 2 (/ c (pow b 2)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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))) (/ b a))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (* (sqrt (/ c a)) (sqrt -1))) (* -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 (/ (+ (* -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 (+ (* -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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) #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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (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)))) #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 (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* a (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 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 (+ 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) #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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (+ (* -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 (/ (- (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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 1/2 (/ 1 a)))))))
#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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (/ (- (* 2 (pow b 2)) (* 2 (* a c))) (pow b 2))))
#s(approx (/ c (* b b)) #s(hole binary64 (/ c (pow b 2))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* 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 (* 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 (* 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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) 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 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (/ (+ (* -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 (* -1 (/ (+ (* -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) 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 (/ (* 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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (/ (- (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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* b (+ (* -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 (- (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 (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* -2 (/ c b)) (* 2 (/ b a)))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* 2 (/ b a)) (* c (- (* -2 (/ (* a c) (pow b 3))) (* 2 (/ 1 b)))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (+ (* 2 (/ b a)) (* 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) #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 c #s(hole binary64 c))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 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 (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)))) #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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* (sqrt (/ 1 (* a c))) (sqrt -4)) (/ b (* a c))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* c (+ (* 1/2 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (+ (* (sqrt (/ 1 (* a c))) (sqrt -4)) (/ b (* a c)))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* 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)) (/ b (* a c))))))))
#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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (+ (* -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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* c (- (* 2 (/ 1 c)) (* 2 (/ a (pow b 2)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a 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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1)))) (/ b a)) 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 (/ (+ (* -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)) (/ b a)) c)) (* 2 (* (sqrt (/ 1 (* a c))) (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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) #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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#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 (- (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) (- 2 (* (* a (/ c (* b b))) 2))) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(hole binary64 (* c (+ (* -2 (/ a (pow b 2))) (* 2 (/ 1 c))))))
Outputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 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 (+.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)
(+.f64 b (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/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 (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 a #s(literal 4 binary64)) c)
(*.f64 a (*.f64 #s(literal 4 binary64) c))
(*.f64 a #s(literal 4 binary64))
a
#s(literal 4 binary64)
c
#s(literal -1/2 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))
(/.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)
(+.f64 c 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)
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.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))))
#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)))
(*.f64 (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)
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b))))
(/.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 (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b))) (/.f64 c (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b))))
(/.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 (*.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 b b)) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b)))
(/.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 (+.f64 (pow.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) #s(literal 3 binary64)) (pow.f64 (neg.f64 b) #s(literal 3 binary64))) (+.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 (*.f64 b b) (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b)))))
(-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (*.f64 #s(literal 1 binary64) b))
(+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
(*.f64 #s(literal -1 binary64) b)
(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 (*.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 (*.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 (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 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 #s(literal 4 binary64) a) c))
(+.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) (*.f64 b b))
(+.f64 (*.f64 b b) (*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(+.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a c)))
(*.f64 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) (*.f64 a c))
(*.f64 #s(literal 4 binary64) a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.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))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(/.f64 (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 c b))) (-.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
(/.f64 (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a))) (-.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 c b) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))))
(/.f64 (+.f64 (pow.f64 (/.f64 c b) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))))
(/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 b a))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))
(/.f64 (neg.f64 c) (neg.f64 b))
(/.f64 c b)
(*.f64 #s(literal -1 binary64) (/.f64 b a))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))
(/.f64 (neg.f64 b) a)
(neg.f64 (/.f64 b a))
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) #s(literal 2 binary64)) a)
(/.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 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b)))
(/.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))))
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 (*.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 (+.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 (*.f64 #s(literal -1/2 binary64) (/.f64 b a)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
(+.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 b a)))
(*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 c a))) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
(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 (*.f64 c #s(literal -1 binary64)) a)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 (*.f64 #s(literal 1/2 binary64) b) a)
#s(literal 1/2 binary64)
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))))))
(*.f64 #s(literal 2 binary64) (/.f64 c #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))))
(*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64)))))
(neg.f64 (*.f64 b (-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))) (+.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 8 binary64) (pow.f64 (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (+.f64 (*.f64 (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64)))))))
(-.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64))))
(+.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 a (/.f64 (/.f64 c b) b))) #s(literal 2 binary64)))
(*.f64 (*.f64 a (/.f64 (/.f64 c b) b)) #s(literal 2 binary64))
(*.f64 a (*.f64 (/.f64 (/.f64 c b) b) #s(literal 2 binary64)))
(*.f64 a (/.f64 (/.f64 c b) b))
(/.f64 (neg.f64 (*.f64 a c)) (neg.f64 (*.f64 b b)))
(/.f64 (*.f64 a c) (*.f64 b b))
(/.f64 (neg.f64 c) (neg.f64 (*.f64 b b)))
(/.f64 (/.f64 c b) b)
(/.f64 c (*.f64 b b))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) b) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) b))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) b) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) b))))
#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 (+.f64 (/.f64 (*.f64 a c) b) (neg.f64 b)) a))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) (neg.f64 b)) a))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (+.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 c b))) (neg.f64 b)) a))
#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 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b)) (*.f64 #s(literal -2 binary64) b)) a))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (+.f64 (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)) a))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)) a))
#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 a (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (+.f64 (*.f64 a (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.f64 c b)))) (*.f64 #s(literal 2 binary64) b)))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) b)
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b)) b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)))) b))
#s(approx (sqrt (- (* b b) (* (* a 4) c))) (+.f64 (*.f64 a (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.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 a 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 (+.f64 (/.f64 (*.f64 a c) b) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 c b))) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (+.f64 (+.f64 (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) c)))) (neg.f64 (*.f64 c (/.f64 (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 b b)))))) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))))) (/.f64 c b))) (neg.f64 b)) a))
#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 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (*.f64 a (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.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 (/ (- (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 (+.f64 (/.f64 (*.f64 a c) b) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (+.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 c b))) (neg.f64 b)) a))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) (*.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 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 (+.f64 (/.f64 (*.f64 a c) b) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 c b))) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 a (+.f64 (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (+.f64 (+.f64 (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) c)))) (neg.f64 (*.f64 c (/.f64 (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 b b)))))) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))))) (/.f64 c b))) (neg.f64 b)) a))
#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 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.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 (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b)) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 a (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.f64 c b)))) b))
#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 (* (* 4 a) c) (*.f64 (*.f64 #s(literal 4 binary64) a) c))
#s(approx (* 4 a) (*.f64 #s(literal 4 binary64) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (neg.f64 b) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (/.f64 (*.f64 a c) b) (neg.f64 b)) a))
#s(approx (/ (neg b) a) (/.f64 (neg.f64 b) a))
#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 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 (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a)))
#s(approx (neg (sqrt (* (/ c a) -1))) (neg.f64 (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) (neg.f64 (/.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 (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (*.f64 #s(literal -2 binary64) b))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a c) b) b)))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) #s(literal 2 binary64))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) a) c) (*.f64 b b))))
#s(approx (* (* a (/ c (* b b))) 2) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) a) c) (*.f64 b b)))
#s(approx (* a (/ c (* b b))) (*.f64 a (/.f64 (/.f64 c b) b)))
#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 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.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 -4 binary64))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (+.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 #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)))))))
#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 b a)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) 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) 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) (* (* 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 (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 (*.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 (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) (- (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 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 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 (*.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 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 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 #s(literal -2 binary64) (/.f64 (+.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 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (/.f64 b #s(literal -4 binary64))))) 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 (/ (- (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) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.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 -4 binary64))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (+.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 #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)))))))
#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 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 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 (*.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 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 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 #s(literal -2 binary64) (/.f64 (+.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 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (*.f64 a c)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (/.f64 b #s(literal -4 binary64))))) 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 (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 (*.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 (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 (- (* 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 b) (/ (neg b) a)) (/.f64 c b))
#s(approx (+ (/ c b) (/ (neg b) a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) 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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg.f64 (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) (- 2 (* (* a (/ c (* b b))) 2))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) b)))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 b a)) (*.f64 #s(literal -2 binary64) (/.f64 c b)))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a c)) (*.f64 b b)))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (*.f64 a (-.f64 (/.f64 #s(literal 2 binary64) a) (*.f64 #s(literal 2 binary64) (/.f64 (/.f64 c b) b)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (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/2 binary64) (/.f64 b a)) (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 (/.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)) (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 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (*.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))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#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 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 (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)))) (neg.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) a) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 b (/.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))) 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 (neg.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) (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 (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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (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 (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 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a b)) (*.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))) a)) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64)))) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.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))) (*.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))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a b))) a)) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64)))) 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 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (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/2 binary64) (/.f64 b a)) (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 (/.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)) (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 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (*.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))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (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 (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 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a b)) (*.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))) a)) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.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))) (*.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))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a b))) a)) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64)))) 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 (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 (- (* 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 (- (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/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 (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (neg.f64 (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 c b)) (*.f64 #s(literal -2 binary64) (/.f64 b a))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (*.f64 a (-.f64 (/.f64 #s(literal 2 binary64) a) (*.f64 #s(literal 2 binary64) (/.f64 (/.f64 c b) b)))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#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 (*.f64 #s(literal -1/4 binary64) (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))) 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/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.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)))))) #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/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.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)))))) (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 (* b b) (*.f64 b b))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 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 #s(literal -2 binary64) (+.f64 (*.f64 b (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) c) #s(literal 16 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 (*.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))) (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/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.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)))))) #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 (*.f64 #s(literal -1/4 binary64) (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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 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 #s(literal -2 binary64) (+.f64 (*.f64 b (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) c) #s(literal 16 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 (*.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 (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/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.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)))))) #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/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 a c)))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.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)))))) (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 (- (* b b) (* (* 4 a) c)) (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 b b) a)) c) b))
#s(approx (/ c b) (/.f64 c b))
#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) (- 2 (* (* a (/ c (* b b))) 2))) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (*.f64 a c))) b))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a c))) (*.f64 b b)))
#s(approx (/ c (* b b)) (/.f64 (/.f64 c b) b))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (*.f64 b (-.f64 (/.f64 (/.f64 c b) b) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (*.f64 b (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (*.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 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.f64 b (-.f64 (/.f64 #s(literal 2 binary64) a) (*.f64 #s(literal 2 binary64) (/.f64 (/.f64 c b) b)))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.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 (/.f64 c b) b)))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.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 (/.f64 c b) 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 (/.f64 c 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 (/.f64 c b) b)) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c (*.f64 b 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 (/.f64 c 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 (/.f64 c 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 (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 b (-.f64 (/.f64 (/.f64 c b) b) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (*.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))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (*.f64 b (+.f64 (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64))))))
#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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 b (-.f64 (/.f64 (/.f64 c b) b) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 b (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.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 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 b (-.f64 (/.f64 (/.f64 c b) b) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.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))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 b (+.f64 (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (/.f64 c b) b)) (pow.f64 a #s(literal -1 binary64))))))
#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 (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 (/.f64 c 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 (/.f64 c b) b)) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#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 (+ (/ c b) (/ (neg b) a)) (*.f64 b (-.f64 (/.f64 (/.f64 c b) b) (pow.f64 a #s(literal -1 binary64)))))
#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 (/.f64 c b) b)) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c (*.f64 b 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 (neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) b)) (/.f64 #s(literal 1/2 binary64) a))))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (*.f64 b (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) a) c) (*.f64 b b)) #s(literal 2 binary64))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.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)) (/.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)))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (neg.f64 b)) a)) (/.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)))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (/.f64 c b)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (/.f64 (+.f64 (+.f64 c (/.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 (*.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 a (ratio-of-squares.f64 c b)))) 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) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c)) b)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (/.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 (*.f64 a (ratio-of-squares.f64 c b)) c))) b)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c)) (/.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 #s(literal 2 binary64) (/.f64 (*.f64 a 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 (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 (/.f64 c 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 (/.f64 c b) b)) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 c b)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (neg.f64 (/.f64 (+.f64 (+.f64 (*.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 (*.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 a (ratio-of-squares.f64 c b)))) 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 (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 (/.f64 c 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 (/.f64 c 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)) (neg.f64 (/.f64 c b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (+.f64 c (/.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 (*.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 a (ratio-of-squares.f64 c b)))) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 c b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (+.f64 (*.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 (*.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 a (ratio-of-squares.f64 c b)))) 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 (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 (/.f64 c 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 (/.f64 c b) b)) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c (*.f64 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 (/.f64 c 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 (/.f64 c b) b)) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c (*.f64 b b))))))))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 (/.f64 c 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)))) (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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 (neg.f64 b) (+.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) b) (/.f64 #s(literal 1/2 binary64) a))))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (*.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) a) -1/2) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (+.f64 (*.f64 c (+.f64 (*.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (+.f64 (*.f64 c (+.f64 (*.f64 c (+.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)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 c b)) (*.f64 #s(literal -2 binary64) (/.f64 b a))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (*.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))) (*.f64 #s(literal 2 binary64) (/.f64 b a))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (+.f64 (*.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))) (*.f64 #s(literal 2 binary64) (/.f64 b a))))
#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 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.f64 a b)))) (*.f64 #s(literal 2 binary64) 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 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.f64 a b)))) b))
#s(approx c c)
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (*.f64 c (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 c (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (*.f64 c (+.f64 (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 #s(literal -1/8 binary64) (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) (*.f64 a a))))) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64))))) (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64))))) (pow.f64 b #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (* 2 c) (*.f64 #s(literal 2 binary64) c))
#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 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 c (+.f64 (*.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 c (+.f64 (*.f64 c (+.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)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 c (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 c (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 c (+.f64 (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 #s(literal -1/8 binary64) (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) (*.f64 a a))))) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64))))) (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64))))) (pow.f64 b #s(literal -1 binary64)))) (/.f64 (neg.f64 b) a)))
#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 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.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 (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 #s(literal -2 binary64) (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64)))) (/.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) (/.f64 a b)))) b))
#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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg.f64 (+.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 c (*.f64 #s(literal -1/2 binary64) (+.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 c (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (/.f64 b a) c) (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 a c))) (/.f64 (*.f64 b b) (sqrt.f64 #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 (/.f64 (/.f64 b a) c) (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))) (+.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)))) (/.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) (pown3/2s.f64 (*.f64 a c))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64))))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (*.f64 c (+.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) (*.f64 c (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pown3/2s.f64 (*.f64 a c))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (+.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) (*.f64 c (+.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)))) (+.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) (*.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))) (*.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 (*.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 (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) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (+.f64 (neg.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 c c))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (+.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))) (*.f64 (sqrt.f64 (/.f64 c a)) (*.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))))) (sqrt.f64 #s(literal -4 binary64)))))) (pow.f64 c #s(literal 3 binary64)))) (-.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 (+.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)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64)))) (*.f64 (*.f64 #s(literal -2 binary64) (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 (/.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 #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 (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 #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 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 c (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (/.f64 b a) c) (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 (/.f64 (/.f64 b a) c) (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 a c))) (/.f64 (*.f64 b b) (sqrt.f64 #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 (/.f64 (/.f64 b a) c) (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -4 binary64))))) (+.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)))) (/.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) (pown3/2s.f64 (*.f64 a c))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.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 c c))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 c a)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.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))) (*.f64 (sqrt.f64 (/.f64 c a)) (*.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))))) (sqrt.f64 #s(literal -4 binary64)))))) (pow.f64 c #s(literal 3 binary64)))) (-.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 (+.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)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 b a) #s(literal -4 binary64)))) (*.f64 (*.f64 #s(literal -2 binary64) (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 (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 (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 #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 (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 (*.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 (*.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 (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 (- (* b b) (* (* 4 a) c)) (*.f64 c (-.f64 (/.f64 (*.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 c (+.f64 (/.f64 (neg.f64 b) (*.f64 a c)) (pow.f64 b #s(literal -1 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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.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) (- 2 (* (* a (/ c (* b b))) 2))) (*.f64 c (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 b c)) (*.f64 #s(literal -2 binary64) (/.f64 a b)))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (*.f64 c (-.f64 (/.f64 #s(literal 2 binary64) c) (*.f64 #s(literal 2 binary64) (/.f64 a (*.f64 b b))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (*.f64 c (-.f64 (neg.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (*.f64 c (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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))))))
#s(approx (* (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) -1/2) (neg.f64 (*.f64 c (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (*.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 (neg.f64 b) (*.f64 a c))))))
#s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.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 -1 binary64)))) (/.f64 b a)) 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) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.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)))) (*.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))))) c)) (/.f64 b a)) 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) (neg.f64 (*.f64 c (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) (/.f64 (neg.f64 b) c)))))
#s(approx (+ (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (*.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) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (*.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))))) 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))) (neg.f64 (*.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))) (neg.f64 (*.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))) (neg.f64 (*.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)) (neg.f64 (*.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 (neg.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 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #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 b (/.f64 c a)))) c))))
#s(approx (/ (* 2 c) (- (sqrt (- (* b b) (* (* a 4) c))) b)) (*.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/16 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) c)) (*.f64 a a)) (-.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 (*.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))))
#s(approx (- (sqrt (- (* b b) (* (* a 4) c))) b) (neg.f64 (*.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) (neg.f64 (*.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) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (*.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))))) c)) 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)))) (* 2 a)) (neg.f64 (*.f64 c (-.f64 (neg.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 b a) c))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (*.f64 c (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (*.f64 c (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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))))))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.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 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #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 b (/.f64 c a)))) c))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.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/16 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) c)) (*.f64 a a)) (-.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 (*.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))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.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)))) (neg.f64 (*.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)))) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 c a))) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal -1 binary64)))) (*.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))))) 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))) (neg.f64 (*.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))) (neg.f64 (*.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))) (neg.f64 (*.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) (* (* 4 a) c)) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (*.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))
#s(approx (+ (/ c b) (/ (neg b) a)) (neg.f64 (*.f64 c (-.f64 (/.f64 (/.f64 b a) c) (pow.f64 b #s(literal -1 binary64))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.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)))) (neg.f64 (*.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)))) (neg.f64 (*.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 (- (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))) (neg.f64 (*.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 (sqrt (* (/ c a) -1))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))
#s(approx (sqrt (* (/ c a) -1)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))
#s(approx (* (neg b) (- 2 (* (* a (/ c (* b b))) 2))) (neg.f64 (*.f64 c (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 a b)) (*.f64 #s(literal -2 binary64) (/.f64 b c))))))
#s(approx (- 2 (* (* a (/ c (* b b))) 2)) (*.f64 c (-.f64 (/.f64 #s(literal 2 binary64) c) (*.f64 #s(literal 2 binary64) (/.f64 a (*.f64 b b))))))

eval456.0ms (6.6%)

Memory
29.2MiB live, 505.4MiB allocated; 89ms collecting garbage
Samples
109.0ms2 153×0invalid
107.0ms919×0valid
Compiler

Compiled 80 992 to 4 168 computations (94.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 128.0ms
ival-mult: 104.0ms (81.6% of total)
ival-div: 12.0ms (9.4% of total)
ival-pow: 5.0ms (3.9% of total)
ival-true: 2.0ms (1.6% of total)
ival-sqrt: 2.0ms (1.6% of total)
adjust: 1.0ms (0.8% of total)
ival-assert: 1.0ms (0.8% of total)
exact: 0.0ms (0% of total)

prune148.0ms (2.1%)

Memory
12.9MiB live, 152.2MiB allocated; 13ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New1 072111 083
Fresh516
Picked505
Done000
Total1 082121 094
Accuracy
99.8%
Counts
1 094 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
43.0%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
49.3%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 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))))
46.1%
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 #s(approx (sqrt (* (/ c a) -1)) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
68.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
48.6%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -4 binary64))))))
38.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
48.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
45.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
40.1%
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
44.5%
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (/.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)) 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))))
50.5%
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (*.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 (neg.f64 b) (*.f64 a c)))))) #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))))
42.3%
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
Compiler

Compiled 1 542 to 882 computations (42.8% saved)

series73.0ms (1.1%)

Memory
-42.4MiB live, 109.1MiB allocated; 27ms collecting garbage
Counts
54 → 276
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(/.f64 c b)
c
(/.f64 (neg.f64 b) a)
(neg.f64 b)
a
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
(+.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))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) 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) a))
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
#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)))
(*.f64 (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)
#s(literal -1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.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 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a)))
(neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))
(/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a)
(+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b))
(sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64)))
(*.f64 (*.f64 a c) #s(literal -1 binary64))
(*.f64 a c)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) b)
#s(literal 1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a))
(-.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 b b)
(*.f64 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
(+.f64 a a)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 b a)
Outputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) a)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (neg b) a) #s(hole binary64 (* -1 (/ b a))))
#s(approx a #s(hole binary64 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (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 (* (sqrt (* (/ c a) -4)) -1/2) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a)))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (* (* a c) -1)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -1))))
#s(approx (* (* a c) -1) #s(hole binary64 (* -1 (* a c))))
#s(approx (* a c) #s(hole binary64 (* a c)))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) 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 (- (* 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 (- (* 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 a) #s(hole binary64 (* 2 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 (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -1))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* a (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (- (* 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 (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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 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 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (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 (* (sqrt (* (/ c a) -4)) -1/2) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* -1 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* 1/2 (/ b a)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))))
#s(approx (sqrt (* (* a c) -1)) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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 (- (* b b) (* (* 4 a) 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 (/ (- (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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#s(approx (neg b) #s(hole binary64 (* -1 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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (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 (* 1/2 b) #s(hole binary64 (* 1/2 b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a 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)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 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 (- (* 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 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* 1/2 b)))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* b (+ 1/2 (* (sqrt (* a c)) (/ (sqrt -1) b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#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 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (/ c b) (/ (neg b) a)) #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 (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (* a c)) (/ (sqrt -1) b))) 1/2)))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) 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 (* -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 (- (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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#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 (- (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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* c (+ (* 1/2 (/ b c)) (* (sqrt (/ a c)) (sqrt -1))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 (* (sqrt (* (/ c a) -4)) -1/2) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ b c)) (* (sqrt (/ a c)) (sqrt -1)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#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)))))
Calls

9 calls:

TimeVariablePointExpression
18.0ms
a
@0
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (/ c b) (/ (neg b) a)) (/ c b) c (/ (neg b) a) (neg b) a (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 -1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt (* (* a c) -1)) (* (* a c) -1) (* a c) -1 (* 1/2 b) 1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (+ a a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (* 1/2 (/ b a)) (/ b a))
6.0ms
c
@0
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (/ c b) (/ (neg b) a)) (/ c b) c (/ (neg b) a) (neg b) a (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 -1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt (* (* a c) -1)) (* (* a c) -1) (* a c) -1 (* 1/2 b) 1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (+ a a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (* 1/2 (/ b a)) (/ b a))
6.0ms
c
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (/ c b) (/ (neg b) a)) (/ c b) c (/ (neg b) a) (neg b) a (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 -1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt (* (* a c) -1)) (* (* a c) -1) (* a c) -1 (* 1/2 b) 1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (+ a a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (* 1/2 (/ b a)) (/ b a))
5.0ms
a
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (/ c b) (/ (neg b) a)) (/ c b) c (/ (neg b) a) (neg b) a (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 -1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt (* (* a c) -1)) (* (* a c) -1) (* a c) -1 (* 1/2 b) 1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (+ a a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (* 1/2 (/ b a)) (/ b a))
5.0ms
a
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+ (/ c b) (/ (neg b) a)) (/ c b) c (/ (neg b) a) (neg b) a (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (if (>= b 0) (/ (- (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)) (* (sqrt (* (/ c a) -4)) -1/2) (sqrt (* (/ c a) -4)) (* (/ c a) -4) (/ c a) -4 -1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt (* (* a c) -1)) (* (* a c) -1) (* a c) -1 (* 1/2 b) 1/2 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (+ a a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg (sqrt (* (/ c a) -1))) (sqrt (* (/ c a) -1)) (* (/ c a) -1) (* 1/2 (/ b a)) (/ b a))

rewrite268.0ms (3.9%)

Memory
38.0MiB live, 220.9MiB allocated; 37ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0130911691
0137210581
1731310581
0853710440
Stop Event
iter limit
node limit
iter limit
Counts
330 → 432
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(/.f64 c b)
c
(/.f64 (neg.f64 b) a)
(neg.f64 b)
a
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
(+.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))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) 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) a))
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
#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)))
(*.f64 (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)
#s(literal -1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.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 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a)))
(neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))
(/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a)
(+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b))
(sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64)))
(*.f64 (*.f64 a c) #s(literal -1 binary64))
(*.f64 a c)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) b)
#s(literal 1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a))
(-.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 b b)
(*.f64 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
(+.f64 a a)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 b a)
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) a)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (neg b) a) #s(hole binary64 (* -1 (/ b a))))
#s(approx a #s(hole binary64 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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (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 (* (sqrt (* (/ c a) -4)) -1/2) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a)))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (sqrt (* (* a c) -1)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -1))))
#s(approx (* (* a c) -1) #s(hole binary64 (* -1 (* a c))))
#s(approx (* a c) #s(hole binary64 (* a c)))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) 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 (- (* 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 (- (* 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 a) #s(hole binary64 (* 2 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 (* 1/2 (/ b a)) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ b a) #s(hole binary64 (/ b a)))
#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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -1))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* a (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1/2 (* (sqrt (/ c a)) (sqrt -4)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#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 (- (* 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 (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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 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 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (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 (* (sqrt (* (/ c a) -4)) -1/2) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* -1 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* 1/2 (/ b a)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))))
#s(approx (sqrt (* (* a c) -1)) #s(hole binary64 (* -1 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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 (- (* b b) (* (* 4 a) 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 (/ (- (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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#s(approx (neg b) #s(hole binary64 (* -1 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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (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 (* 1/2 b) #s(hole binary64 (* 1/2 b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a 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)))) (+ a a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (* b (- (* b (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 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 (- (* 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 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* 1/2 b)))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* b (+ 1/2 (* (sqrt (* a c)) (/ (sqrt -1) b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#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 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#s(approx (+ (/ c b) (/ (neg b) a)) #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 (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (* a c)) (/ (sqrt -1) b))) 1/2)))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) 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 (* -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 (- (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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#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 (- (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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* c (+ (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* c (+ (* 1/2 (/ b c)) (* (sqrt (/ a c)) (sqrt -1))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#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) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 (* (sqrt (* (/ c a) -4)) -1/2) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ b c)) (* (sqrt (/ a c)) (sqrt -1)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#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)))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(/.f64 (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a))) (-.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(/.f64 (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 c b))) (-.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
(/.f64 (+.f64 (pow.f64 (/.f64 c b) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 c b) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))))
(/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))
(/.f64 (neg.f64 c) (neg.f64 b))
(/.f64 c b)
c
(*.f64 (/.f64 b a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))
(/.f64 (neg.f64 b) a)
(neg.f64 (/.f64 b a))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
a
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b)))
(*.f64 #s(literal 2 binary64) c)
(*.f64 c #s(literal 2 binary64))
(+.f64 c c)
#s(literal 2 binary64)
(/.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 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (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))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) 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) a))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 c a))) (sqrt.f64 #s(literal -4 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (/.f64 c a)))
(*.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)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 c a) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (/.f64 c a))
(/.f64 (*.f64 #s(literal -4 binary64) c) a)
(/.f64 (neg.f64 c) (neg.f64 a))
(/.f64 c a)
#s(literal -4 binary64)
#s(literal -1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a)))
(*.f64 (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) a))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b))) a)
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b))) a)
(/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a))
(neg.f64 (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) a))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b))) (neg.f64 a))
(/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) a)
(+.f64 (/.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) a) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (/.f64 b a) #s(literal 1/2 binary64)) (/.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) a))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (sqrt.f64 (neg.f64 (*.f64 c a)))) (*.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 #s(literal 1/2 binary64) b))) (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal 1/2 binary64) b)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 #s(literal 1/2 binary64) b)) (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (sqrt.f64 (neg.f64 (*.f64 c a))))) (-.f64 (*.f64 #s(literal 1/2 binary64) b) (sqrt.f64 (neg.f64 (*.f64 c a)))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) b) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (sqrt.f64 (neg.f64 (*.f64 c a)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 #s(literal 1/2 binary64) b)) (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal 1/2 binary64) b)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 #s(literal 1/2 binary64) b)) (-.f64 (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (sqrt.f64 (neg.f64 (*.f64 c a)))) (*.f64 (*.f64 #s(literal 1/2 binary64) b) (sqrt.f64 (neg.f64 (*.f64 c a)))))))
(-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b))
(-.f64 (*.f64 #s(literal 1/2 binary64) b) (*.f64 (neg.f64 (sqrt.f64 (*.f64 c a))) (sqrt.f64 #s(literal -1 binary64))))
(+.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal 1/2 binary64) b))
(+.f64 (*.f64 #s(literal 1/2 binary64) b) (sqrt.f64 (neg.f64 (*.f64 c a))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a)))
(*.f64 (sqrt.f64 (*.f64 c a)) (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 (neg.f64 (*.f64 c a)) #s(literal 1/2 binary64))
(sqrt.f64 (neg.f64 (*.f64 c a)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (*.f64 c a))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal -1 binary64) a) c)
(*.f64 (*.f64 c a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 c a))
(*.f64 a (*.f64 c #s(literal -1 binary64)))
(neg.f64 (*.f64 c a))
(*.f64 c a)
(*.f64 a c)
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) b)
(*.f64 b #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.f64 #s(literal 2 binary64) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))))
(/.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.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 c (*.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))
(pow.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 c (*.f64 a #s(literal 4 binary64))) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (+.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 (*.f64 c a) #s(literal -4 binary64))) (pow.f64 b #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 b b)))
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 c (*.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 c (*.f64 a #s(literal 4 binary64))) (*.f64 c (*.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 (*.f64 c a) #s(literal -4 binary64))) (-.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 b b)))))
(-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))
(+.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 b b))
(+.f64 (*.f64 b b) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(+.f64 (*.f64 b b) (*.f64 (*.f64 c a) #s(literal -4 binary64)))
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(+.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 c a) #s(literal 4 binary64))
(*.f64 c (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 a #s(literal 4 binary64)) c)
(*.f64 #s(literal 4 binary64) (*.f64 c a))
(*.f64 a #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 a a) (*.f64 a a)) (-.f64 a a))
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 a a) (*.f64 a a))))
(+.f64 a a)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))) (*.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (*.f64 (/.f64 b a) #s(literal -1/2 binary64)))) (-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))) (*.f64 (*.f64 (/.f64 b a) #s(literal 1/2 binary64)) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))) (-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 b a) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))) (+.f64 (*.f64 (*.f64 (/.f64 b a) #s(literal 1/2 binary64)) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))) (-.f64 (*.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))))
(-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
(+.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 c a))) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 (/.f64 c a))))
(neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 c a)))
(*.f64 (sqrt.f64 (/.f64 c a)) (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 (neg.f64 (/.f64 c a)) #s(literal 1/2 binary64))
(sqrt.f64 (neg.f64 (/.f64 c a)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (/.f64 c a))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 c a))
(/.f64 (*.f64 c #s(literal -1 binary64)) a)
(/.f64 (*.f64 #s(literal -1 binary64) c) a)
(neg.f64 (/.f64 c a))
(*.f64 (/.f64 b a) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 b a))
(/.f64 (*.f64 #s(literal 1/2 binary64) b) a)
(/.f64 (neg.f64 b) (neg.f64 a))
(/.f64 b a)
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) b) a) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (+.f64 (/.f64 (*.f64 c a) b) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.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 c b)) a) (neg.f64 b)) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (neg.f64 b) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (/.f64 (*.f64 c a) b) (neg.f64 b)) a))
#s(approx (/ (neg b) a) (/.f64 (neg.f64 b) a))
#s(approx a 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 (+.f64 (/.f64 (*.f64 c a) b) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (+.f64 (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64))) (*.f64 (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) c)) #s(literal -1/8 binary64))) (neg.f64 (*.f64 c (/.f64 (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 b b))))) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))) a) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64)))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) b)) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) a) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64)))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) a) b))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) #s(literal -1/2 binary64)))
#s(approx (sqrt (* (/ c a) -4)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))
#s(approx (* (/ c a) -4) (*.f64 (/.f64 c a) #s(literal -4 binary64)))
#s(approx (/ c a) (/.f64 c a))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a)))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) a))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)))
#s(approx (sqrt (* (* a c) -1)) (sqrt.f64 (neg.f64 (*.f64 c a))))
#s(approx (* (* a c) -1) (neg.f64 (*.f64 c a)))
#s(approx (* a c) (*.f64 c a))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) b) a) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (+.f64 (/.f64 (*.f64 c a) b) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.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 c b)) a) (neg.f64 b)) a))
#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 c a) 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 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) a) (*.f64 #s(literal 2 binary64) b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
#s(approx (* (* 4 a) c) (*.f64 c (*.f64 a #s(literal 4 binary64))))
#s(approx (* 4 a) (*.f64 a #s(literal 4 binary64)))
#s(approx (+ a a) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a)))
#s(approx (neg (sqrt (* (/ c a) -1))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (sqrt (* (/ c a) -1)) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (* (/ c a) -1) (neg.f64 (/.f64 c a)))
#s(approx (* 1/2 (/ b a)) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))
#s(approx (/ b a) (/.f64 b a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a 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)))) (+ a a)) (*.f64 #s(literal -1/2 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)))) (+ a a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.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 -4 binary64))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal 1/16 binary64)) (*.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)))))))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))
#s(approx (+ (/ c b) (/ (neg b) a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) 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 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (*.f64 a a)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (*.f64 a a)) #s(literal -2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 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 (*.f64 (/.f64 (*.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))) #s(literal 1/2 binary64))) (pow.f64 a #s(literal 3 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))
#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 (*.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)) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/8 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))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.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)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/8 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))))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 7 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64))))) #s(literal 1/16 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 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/8 binary64))) a))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (*.f64 (+.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a 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)))) (+ a a)) (*.f64 #s(literal -1/2 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)))) (+ a a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.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 -4 binary64))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal 1/16 binary64)) (*.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)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#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) (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))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64)))))) (+.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)) (*.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)))))) a))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (*.f64 c a) #s(literal -4 binary64)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (-.f64 (/.f64 (*.f64 b b) a) (*.f64 c #s(literal 4 binary64))) a))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -1/2 binary64) b)) a)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (*.f64 #s(literal -1/128 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a b) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.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))) a)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.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)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.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 (*.f64 (*.f64 a a) (/.f64 (pow.f64 b #s(literal 3 binary64)) c)) #s(literal 1/32 binary64))) a))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a b))) a)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) #s(literal -2 binary64)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #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 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) b) a)) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #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/4 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (*.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))) a)) b) a)) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal -2 binary64))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) #s(literal -2 binary64)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal -2 binary64))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/64 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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #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))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 7 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64))))) #s(literal 1/512 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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal -2 binary64)))) (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/64 binary64))) a)))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (sqrt (* (/ c a) -4)) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal 2 binary64)))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (neg.f64 (sqrt.f64 (neg.f64 (*.f64 c a)))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (neg.f64 (*.f64 (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))) a)))
#s(approx (sqrt (* (* a c) -1)) (neg.f64 (sqrt.f64 (neg.f64 (*.f64 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -1/2 binary64) b)) a)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (*.f64 #s(literal -1/128 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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)) (sqrt.f64 (neg.f64 (/.f64 c a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) #s(literal 2 binary64)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.f64 (/.f64 b a) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #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 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) b) a)) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #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) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b)))) a)) b) a)) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal 2 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 (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.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 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)))) (+ a a)) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal 1/16 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (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)))) 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 (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 b b) a)) c) b))
#s(approx (/ c b) (/.f64 c b))
#s(approx (neg b) (neg.f64 b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 c a))) (/.f64 (/.f64 b a) #s(literal -4 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 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) 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) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) c) #s(literal 16 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64)))) b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 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 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))) (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 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (*.f64 c a))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) b) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #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 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (*.f64 c a))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (*.f64 b b)) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (*.f64 c a) #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 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (*.f64 b b)) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (* 1/2 b) (*.f64 #s(literal 1/2 binary64) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.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 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)))) (+ a a)) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal 1/16 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (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)))) 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 (neg.f64 b) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#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 c a))) (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) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) b) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
#s(approx (* b b) (*.f64 b b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (+.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 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64)) c) a)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (*.f64 c a) #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))) #s(literal -2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64)) #s(literal 1 binary64)) 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 c a) #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 (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (/.f64 b a) #s(literal -1/2 binary64)))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (-.f64 (neg.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) b)) (/.f64 #s(literal 1/2 binary64) a)) b))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (+.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) b) (/.f64 #s(literal 1/2 binary64) a)) b))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (*.f64 #s(literal 1/2 binary64) b))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (*.f64 (+.f64 (/.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) b) #s(literal 1/2 binary64)) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (+.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 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)) #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 c a) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 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 4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.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))) b))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (+.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 (-.f64 (neg.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) b)) (/.f64 #s(literal 1/2 binary64) a)) b))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) a) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 c b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 (+.f64 (+.f64 c (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) a))) (+.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 a (ratio-of-squares.f64 c b)))) b)))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 c b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (+.f64 (*.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 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 a (ratio-of-squares.f64 c b)))) 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 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.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 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 c a) #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) (* (* 4 a) c))) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.f64 b) (+.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64)) #s(literal 1 binary64))))
#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 c a) #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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (neg.f64 b) (+.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) b) (/.f64 #s(literal 1/2 binary64) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) b)) (/.f64 #s(literal 1/2 binary64) a))))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (sqrt.f64 (neg.f64 (*.f64 c a))) b)) #s(literal 1/2 binary64))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) a) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 c b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (/.f64 (+.f64 (+.f64 c (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) a))) (+.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 a (ratio-of-squares.f64 c b)))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) b)))
#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 #s(literal -2 binary64) (*.f64 c a))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) #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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))))) b)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 (neg.f64 b) (+.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) b) (/.f64 #s(literal 1/2 binary64) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (+.f64 (*.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (+.f64 (*.f64 (+.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) (/.f64 (neg.f64 b) a)))
#s(approx c c)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)) c) #s(literal -2 binary64)) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)) a) (*.f64 b b))) (*.f64 (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) (*.f64 a a))) #s(literal -1/8 binary64))) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) c) (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)))) c) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (* 2 c) (*.f64 #s(literal 2 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 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 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 (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 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64)))) c) (*.f64 (/.f64 a b) #s(literal -2 binary64))) c) b))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (neg.f64 (+.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (+.f64 (*.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (+.f64 (*.f64 (+.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) (/.f64 (neg.f64 b) a)))
#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 (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg.f64 (+.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 c a))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (*.f64 c a) #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) (pown3/2s.f64 (*.f64 c a))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64)))))) c))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (+.f64 (/.f64 (neg.f64 b) (*.f64 c a)) (pow.f64 b #s(literal -1 binary64))) c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.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 c c))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 c a))) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.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))) (*.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))))) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 c a)))) (pow.f64 c #s(literal 3 binary64)))) (-.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 (+.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (*.f64 (/.f64 (/.f64 b a) #s(literal -4 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) (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 (+.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) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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)))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 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 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 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)))) #s(literal 1/16 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal -1/8 binary64))) c))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) c))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) c))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (*.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) (*.f64 (/.f64 b c) #s(literal 1/2 binary64))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 c a))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (*.f64 c a) #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) (pown3/2s.f64 (*.f64 c a))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 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))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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))) c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal 1/8 binary64)) (+.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 b c)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 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 (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (*.f64 (-.f64 (neg.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))) c))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b)))) c)) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))) c))) c)))
#s(approx (+ (/ c b) (/ (neg b) a)) (neg.f64 (*.f64 (-.f64 (/.f64 (/.f64 b a) c) (pow.f64 b #s(literal -1 binary64))) c)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) (/.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))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) c)) (*.f64 a a)) (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64)) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 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))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 b c)) c)))
#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 (sqrt.f64 (*.f64 c a)) #s(literal -1 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))))) c)))
#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/4 binary64) (sqrt.f64 (/.f64 c a))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.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))))) c)) b) c)) (*.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 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))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/64 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 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)))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 7 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) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 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 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/64 binary64))) c)))
#s(approx (* (sqrt (* (/ c a) -4)) -1/2) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (sqrt (* (/ c a) -4)) (*.f64 (sqrt.f64 (neg.f64 (/.f64 c a))) #s(literal -2 binary64)))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) c)))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64))) c)))
#s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (neg.f64 (*.f64 (+.f64 (*.f64 (/.f64 b c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (*.f64 (-.f64 (neg.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))) c))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b)))) c)) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))) c))) c)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.f64 (/.f64 b c) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64))) c)))
#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 (sqrt.f64 (*.f64 c a)) #s(literal -1 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))) c)))
#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) (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 (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))) c)))
#s(approx (- (* b b) (* (* 4 a) c)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (*.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)) c)))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (- (neg (sqrt (* (/ c a) -1))) (* 1/2 (/ b a))) (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) c)))
#s(approx (neg (sqrt (* (/ c a) -1))) (sqrt.f64 (neg.f64 (/.f64 c a))))
#s(approx (sqrt (* (/ c a) -1)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))

eval288.0ms (4.2%)

Memory
14.6MiB live, 429.0MiB allocated; 78ms collecting garbage
Samples
113.0ms2 153×0invalid
47.0ms919×0valid
Compiler

Compiled 48 636 to 2 771 computations (94.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 90.0ms
ival-mult: 60.0ms (66.7% of total)
ival-div: 19.0ms (21.1% of total)
ival-pow: 5.0ms (5.6% of total)
ival-true: 2.0ms (2.2% of total)
ival-sqrt: 2.0ms (2.2% of total)
adjust: 1.0ms (1.1% of total)
ival-assert: 1.0ms (1.1% of total)
exact: 0.0ms (0% of total)

prune191.0ms (2.8%)

Memory
-20.1MiB live, 169.8MiB allocated; 80ms collecting garbage
Pruning

18 alts after pruning (17 fresh and 1 done)

PrunedKeptTotal
New71915734
Fresh527
Picked415
Done000
Total72818746
Accuracy
99.8%
Counts
746 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
17.7%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
43.0%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
49.3%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 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))))
38.2%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
41.0%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
36.4%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
55.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
48.6%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
51.4%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
42.7%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (neg.f64 (*.f64 (+.f64 (*.f64 (/.f64 b c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) c))) a))))
45.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
49.0%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
42.8%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))))
45.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
39.8%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
3.2%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
40.1%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
50.5%
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (*.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 (neg.f64 b) (*.f64 a c)))))) #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))))
Compiler

Compiled 2 168 to 1 247 computations (42.5% saved)

series81.0ms (1.2%)

Memory
-3.5MiB live, 134.3MiB allocated; 33ms collecting garbage
Counts
58 → 261
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b)))
(/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))
(+.f64 (*.f64 c a) (*.f64 b (neg.f64 b)))
(*.f64 c a)
c
a
(*.f64 b (neg.f64 b))
(neg.f64 b)
(*.f64 a b)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
(+.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))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #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)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))
(/.f64 c b)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))
(/.f64 (neg.f64 b) a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))))
(neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
(neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))
(sqrt.f64 (neg.f64 (/.f64 c a)))
(neg.f64 (/.f64 c a))
(/.f64 c a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))
(sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))
(*.f64 (*.f64 c a) #s(literal -4 binary64))
#s(literal -4 binary64)
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 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))))
(/.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))))
(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)
(*.f64 #s(literal 2 binary64) a)
(/.f64 (*.f64 #s(literal 2 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 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)) c))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)) c)
(+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.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 (neg.f64 b) c)
Outputs
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) a)))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (+ (* -1 (pow b 2)) (* a c))))
#s(approx (* c a) #s(hole binary64 (* a c)))
#s(approx a #s(hole binary64 a))
#s(approx (* a b) #s(hole binary64 (* a b)))
#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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (neg b) a) #s(hole binary64 (* -1 (/ b a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a)))
#s(approx (neg (sqrt (neg (/ c a)))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (neg (/ c a))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (neg (/ c a)) #s(hole binary64 (* -1 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (sqrt (* (* c a) -4)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* (* c a) -4) #s(hole binary64 (* -4 (* a c))))
#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 (- (* 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 (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4)))))
#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 (/ (- (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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (/ c b)))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* a c)))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* a (+ c (* -1 (/ (pow b 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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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 (- (* 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 (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* (sqrt (/ a c)) (sqrt -4))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* a (+ (* -1 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* -1 (* a (+ (* -1 c) (/ (pow b 2) a))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* -1 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* 1/2 (/ b a)))))
#s(approx (sqrt (* (* c a) -4)) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (/ b (* a c)))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (* b (neg b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (neg b) #s(hole binary64 (* -1 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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#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 (- (* 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 (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ (neg b) c) #s(hole binary64 (* -1 (/ b c))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* (pow b 2) (- (/ (* a c) (pow b 2)) 1))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a))))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 b)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* b (- (* (sqrt (* a c)) (/ (sqrt -4) b)) 1))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -1 (/ b c))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* b (- (* (sqrt (/ a c)) (/ (sqrt -4) b)) (/ 1 c)))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #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 (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/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 (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (* (sqrt (* a c)) (/ (sqrt -4) b))))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -1 (* b (+ (* -1 (* (sqrt (/ a c)) (/ (sqrt -4) b))) (/ 1 c))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#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 (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (/ (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* c (+ a (* -1 (/ (pow b 2) c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* 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 (* 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 (- (* 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 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* -1 (* c (+ (* -1 a) (/ (pow b 2) c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (sqrt (* (* a c) -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 (neg (/ c a)))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (neg (/ c a))) #s(hole binary64 (* -1 (* (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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 (* c (+ (* -2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
Calls

9 calls:

TimeVariablePointExpression
19.0ms
a
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (+ (* c a) (* b (neg b))) (* a b)) (+ (* c a) (* b (neg b))) (* c a) c a (* b (neg b)) (neg b) (* a b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (neg b) a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg (sqrt (neg (/ c a)))) (sqrt (neg (/ c a))) (neg (/ c a)) (/ c a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (* (* c a) -4)) (* (* c a) -4) -4 (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ (neg b) c))
10.0ms
c
@0
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (+ (* c a) (* b (neg b))) (* a b)) (+ (* c a) (* b (neg b))) (* c a) c a (* b (neg b)) (neg b) (* a b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (neg b) a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg (sqrt (neg (/ c a)))) (sqrt (neg (/ c a))) (neg (/ c a)) (/ c a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (* (* c a) -4)) (* (* c a) -4) -4 (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ (neg b) c))
7.0ms
a
@0
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (+ (* c a) (* b (neg b))) (* a b)) (+ (* c a) (* b (neg b))) (* c a) c a (* b (neg b)) (neg b) (* a b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (neg b) a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg (sqrt (neg (/ c a)))) (sqrt (neg (/ c a))) (neg (/ c a)) (/ c a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (* (* c a) -4)) (* (* c a) -4) -4 (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ (neg b) c))
7.0ms
c
@-inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (+ (* c a) (* b (neg b))) (* a b)) (+ (* c a) (* b (neg b))) (* c a) c a (* b (neg b)) (neg b) (* a b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (neg b) a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg (sqrt (neg (/ c a)))) (sqrt (neg (/ c a))) (neg (/ c a)) (/ c a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (* (* c a) -4)) (* (* c a) -4) -4 (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ (neg b) c))
6.0ms
a
@inf
((if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (>= b 0) b 0 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (+ (* c a) (* b (neg b))) (* a b)) (+ (* c a) (* b (neg b))) (* c a) c a (* b (neg b)) (neg b) (* a b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (* 2 c) 2 (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ c b) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (neg b) a) (if (>= b 0) (/ (- (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) (/ (neg b) a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg (sqrt (neg (/ c a)))) (sqrt (neg (/ c a))) (neg (/ c a)) (/ c a) (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (* (* c a) -4)) (* (* c a) -4) -4 (if (>= b 0) (/ (- (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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* b b) (* (* 4 a) c) (* 4 a) 4 (* 2 a) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) (/ (neg b) c))

rewrite294.0ms (4.3%)

Memory
48.1MiB live, 231.8MiB allocated; 27ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0132810662
013949614
175329614
087789502
Stop Event
iter limit
node limit
iter limit
Counts
319 → 433
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b)))
(/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))
(+.f64 (*.f64 c a) (*.f64 b (neg.f64 b)))
(*.f64 c a)
c
a
(*.f64 b (neg.f64 b))
(neg.f64 b)
(*.f64 a b)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))
(*.f64 #s(literal 2 binary64) c)
#s(literal 2 binary64)
(+.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))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #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)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))
(/.f64 c b)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))
(/.f64 (neg.f64 b) a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))))
(neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))
(neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))
(sqrt.f64 (neg.f64 (/.f64 c a)))
(neg.f64 (/.f64 c a))
(/.f64 c a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))
(sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)))
(*.f64 (*.f64 c a) #s(literal -4 binary64))
#s(literal -4 binary64)
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 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))))
(/.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))))
(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)
(*.f64 #s(literal 2 binary64) a)
(/.f64 (*.f64 #s(literal 2 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 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)) c))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)) c)
(+.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.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 (neg.f64 b) c)
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (- (sqrt (- (pow b 2) (* 4 (* a c)))) b))))))
#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) (/ (* a c) b)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (/ c b) (/ (* a (pow c 2)) (pow b 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow b 5))) (/ (pow c 2) (pow b 3)))) (/ c b)))) a)))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (+ (* -1 (pow b 2)) (* a c))))
#s(approx (* c a) #s(hole binary64 (* a c)))
#s(approx a #s(hole binary64 a))
#s(approx (* a b) #s(hole binary64 (* a b)))
#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) (/ (* a c) b)) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* -2 (* a (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3)))))) (/ c b)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -1 b) (* a (+ (* a (+ (* -2 (* a (+ (* -1 (/ (* c (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow c 4) (pow b 6))) (* 16 (/ (pow c 4) (pow b 6))))) c)) (/ (pow c 3) (pow b 5)))))) (* -2 (+ (* -1 (/ (pow c 2) (pow b 3))) (* 1/2 (/ (pow c 2) (pow b 3))))))) (/ c b)))) 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 (* 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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ (* -1 b) (/ (* a c) b)) a)))
#s(approx (/ (neg b) a) #s(hole binary64 (* -1 (/ b a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a)))
#s(approx (neg (sqrt (neg (/ c a)))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (sqrt (neg (/ c a))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (neg (/ c a)) #s(hole binary64 (* -1 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (sqrt (* (* c a) -4)) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* (* c a) -4) #s(hole binary64 (* -4 (* a c))))
#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 (- (* 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 (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* c (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (+ (* -1 (/ b c)) (* (sqrt (/ a c)) (sqrt -4)))))
#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 (/ (- (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 (* (sqrt (/ c a)) (sqrt -4))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (* (sqrt (/ c a)) (sqrt -4))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 4) (pow (sqrt -4) 3)))))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (/ c b)))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* a c)))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* a (+ c (* -1 (/ (pow b 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 (/ (+ (* -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))) (+ (* 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 (/ (+ (* -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))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow a 2) (pow b 3)) (* c (pow (sqrt -4) 4)))) (* (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)))) (pow a 3))) (+ (* 2 (* (sqrt (* a c)) (/ 1 (sqrt -4)))) (* 2 (/ b (pow (sqrt -4) 2)))))) a)))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#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 (- (* 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 (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* (sqrt (* a c)) (sqrt -4))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* a (+ (* -1 (/ b a)) (* (sqrt (/ c a)) (sqrt -4))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* (sqrt (/ a c)) (sqrt -4))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* a (+ (* -1 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -4))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ 1 (* a c))) (* (pow b 2) (sqrt -1)))) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (sqrt (/ 1 (* a (pow c 3)))) (* (pow b 4) (sqrt -1)))) (* 1/8 (* (sqrt (/ a c)) (* (pow b 2) (sqrt -1))))) a)) (* 1/2 b)) a)) (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* -1 (* a (+ (* -1 c) (/ (pow b 2) a))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 b) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* a b)) (* 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))) a)) (* (sqrt (* a c)) (sqrt -1))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -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)))))) (* 2 (/ (+ (* 1/32 (/ (* (pow a 2) (pow b 3)) c)) (* 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)))))))))) a))) a)) (* -1/2 (* a b))) a)) (* (sqrt (* a c)) (sqrt -1))) 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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (- (* -1/2 (/ b a)) (* -1 (* (sqrt (/ c a)) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* (sqrt (/ c a)) (sqrt -1)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* 1/2 (/ b a)))))
#s(approx (sqrt (* (* c a) -4)) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ c a)) (sqrt -1))) (/ b a))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -1 (* a (+ (* 2 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (/ b (* a c)))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* -2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#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/4 (* (sqrt (/ 1 (* (pow a 3) c))) (/ 1 (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 3)))) (/ (pow b 2) (pow (sqrt -4) 3)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (* b (neg b)) #s(hole binary64 (* -1 (pow b 2))))
#s(approx (neg b) #s(hole binary64 (* -1 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 (+ (* (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))) (* 1/2 (/ 1 (* (pow a 2) (* c (pow (sqrt -4) 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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (/ (+ c (* -1 (/ (pow b 2) a))) b)))
#s(approx (/ c b) #s(hole binary64 (/ c b)))
#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 (- (* 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 (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4)))))
#s(approx (/ (neg b) c) #s(hole binary64 (* -1 (/ b c))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 6))) (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4)))) (/ 1 a)))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* (pow b 2) (- (/ (* a c) (pow b 2)) 1))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -2 (/ (+ (* -1 (* a (pow c 2))) (* 1/2 (* a (pow c 2)))) (pow b 4))) (/ c (pow b 2))) (/ 1 a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* b (- (+ (* -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))) (/ c (pow b 2)))) (/ 1 a)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1/2 (/ b a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* 1/2 (/ b a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a))))))
#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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 b)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* b (- (* (sqrt (* a c)) (/ (sqrt -4) b)) 1))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -1 (/ b c))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* b (- (* (sqrt (/ a c)) (/ (sqrt -4) b)) (/ 1 c)))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (- (pow b 2) (* 4 (* a c))))) a)) (* 2 (/ c (+ (sqrt (- (pow b 2) (* 4 (* a c)))) (* -1 b)))))))
#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 (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (* a (pow b 6)))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #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 (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ c (+ (* -2 (/ (+ (* -2 (* (pow a 3) (pow c 4))) (* -1/2 (* (pow a 3) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (pow c 3)) (pow b 4))) (/ (* a (pow c 2)) (pow b 2))))) b))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* b (+ (* -1 (/ c (pow b 2))) (/ 1 a))))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* b (+ (* (sqrt (/ c a)) (/ (sqrt -1) b)) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* -1 (* b (- (* -1 (* (sqrt (/ c a)) (/ (sqrt -1) b))) (* 1/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 (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 (* b (+ 1 (* -1 (* (sqrt (* a c)) (/ (sqrt -4) b))))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* -1 (* b (+ (* -1 (* (sqrt (/ a c)) (/ (sqrt -4) b))) (/ 1 c))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (/ 1 b) (/ (* a c) (pow b 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow b 5))) (/ a (pow b 3)))) (/ 1 b))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (/ c b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* -2 (* c (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3)))))) (/ 1 b))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (/ b a)) (* c (+ (* c (+ (* -2 (* c (+ (* -1 (/ (* a (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))) (pow b 2))) (+ (* -1/8 (/ (* b (+ (* 4 (/ (pow a 4) (pow b 6))) (* 16 (/ (pow a 4) (pow b 6))))) (pow a 2))) (/ (pow a 2) (pow b 5)))))) (* -2 (+ (* -1 (/ a (pow b 3))) (* 1/2 (/ a (pow b 3))))))) (/ 1 b))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#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 (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 (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (+ (* 1/2 (/ b a)) (* (sqrt (/ c a)) (sqrt -1))))))
#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 (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (/ (+ (* -1 b) (* (sqrt (* a c)) (sqrt -4))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (* -1/2 (/ b (* a c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (* (sqrt (/ 1 (* a c))) (sqrt -4))) (+ (* -1/2 (/ b (* a c))) (+ (* -1/4 (* (sqrt (/ 1 (* (pow a 3) (pow c 3)))) (/ (pow b 2) (sqrt -4)))) (* 1/16 (* (sqrt (/ 1 (* (pow a 5) (pow c 5)))) (/ (pow b 4) (pow (sqrt -4) 3))))))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* c (+ a (* -1 (/ (pow b 2) c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (pow c 2))) (* 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 (- (+ (* -1 (/ (+ (* (sqrt (/ c a)) (/ (* b (+ (* -2 (* (sqrt (/ (pow c 3) (pow a 3))) (/ (pow b 2) (pow (sqrt -4) 3)))) (* (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 (* (sqrt (/ c a)) (/ 1 (sqrt -4))))) (+ (* -2 (* (sqrt (/ 1 (* (pow a 3) c))) (/ (pow b 2) (pow (sqrt -4) 3)))) (+ (* -2 (/ b (* a (pow (sqrt -4) 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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* c (+ (* -1 (/ b (* a c))) (/ 1 b)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* c (- (* -1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) #s(hole binary64 (* 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 (* 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 (- (* 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 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/8 (* (sqrt (/ 1 (* (pow a 3) c))) (* (pow b 2) (sqrt -1))))) c)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (* (sqrt (/ 1 (* a c))) (sqrt -1))) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/128 (* (sqrt (/ 1 (* (pow a 5) c))) (* (pow b 4) (sqrt -1))))) c)) (* -1/2 (/ b a))) c)))))))
#s(approx (/ (+ (* c a) (* b (neg b))) (* a b)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#s(approx (+ (* c a) (* b (neg b))) #s(hole binary64 (* -1 (* c (+ (* -1 a) (/ (pow b 2) c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1/2 (/ b a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (+ (* -1/8 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1)))) (* 1/4 (* (sqrt (/ c (pow a 3))) (* (pow b 2) (sqrt -1))))) (* -1/2 (/ (* b c) a))) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* -1 (* (sqrt (/ c a)) (sqrt -1))) (* -1 (/ (- (* -1 (/ (- (+ (* -1/16 (/ (* (pow b 3) c) (pow a 2))) (* 1/2 (* (sqrt (/ 1 (* a c))) (* b (* (sqrt -1) (+ (* -1/8 (* (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 (* (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/2 (/ (* b c) a))) c)))))
#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 (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 (+ (/ c b) (/ (neg b) a)) #s(hole binary64 (* -1 (* c (- (/ b (* a c)) (/ 1 b))))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) #s(hole binary64 (* -1 (* c (- (* 1/2 (/ b (* a c))) (* (sqrt (/ 1 (* a c))) (sqrt -1)))))))
#s(approx (/ (+ (sqrt (* (* a c) -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 (neg (/ c a)))) #s(hole binary64 (* (sqrt (/ c a)) (sqrt -1))))
#s(approx (sqrt (neg (/ c a))) #s(hole binary64 (* -1 (* (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 (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* 2 (* (sqrt (* a c)) (sqrt -1)))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) #s(hole binary64 (* -1 (* c (+ (* -2 (* (sqrt (/ a c)) (sqrt -1))) (/ b c))))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) #s(hole binary64 (+ (* -1 (/ b c)) (* 2 (* (sqrt (/ a c)) (sqrt -1))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* 2 (* (sqrt (/ a c)) (sqrt -1)))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
(/.f64 (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) a) b)
(/.f64 (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 c b))) (-.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
(/.f64 (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a))) (-.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 c b) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))))
(/.f64 (+.f64 (pow.f64 (/.f64 c b) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))))
(/.f64 (neg.f64 (-.f64 (*.f64 c a) (*.f64 b b))) (neg.f64 (*.f64 a b)))
(/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))
(+.f64 (/.f64 (*.f64 c a) (*.f64 a b)) (/.f64 (*.f64 (neg.f64 b) b) (*.f64 a b)))
(+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 b) b) (*.f64 (neg.f64 b) b)) (*.f64 (*.f64 c a) (*.f64 c a))) (-.f64 (*.f64 (neg.f64 b) b) (*.f64 c a)))
(/.f64 (-.f64 (*.f64 (*.f64 c a) (*.f64 c a)) (*.f64 (*.f64 (neg.f64 b) b) (*.f64 (neg.f64 b) b))) (-.f64 (*.f64 c a) (*.f64 (neg.f64 b) b)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 b) b) #s(literal 3 binary64)) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 b) b) (*.f64 (neg.f64 b) b)) (-.f64 (*.f64 (*.f64 c a) (*.f64 c a)) (*.f64 (*.f64 (neg.f64 b) b) (*.f64 c a)))))
(/.f64 (+.f64 (pow.f64 (*.f64 c a) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 b) b) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 c a) (*.f64 c a)) (-.f64 (*.f64 (*.f64 (neg.f64 b) b) (*.f64 (neg.f64 b) b)) (*.f64 (*.f64 c a) (*.f64 (neg.f64 b) b)))))
(-.f64 (*.f64 (neg.f64 b) b) (*.f64 (neg.f64 a) c))
(-.f64 (*.f64 c a) (*.f64 b b))
(+.f64 (*.f64 (neg.f64 b) b) (*.f64 c a))
(+.f64 (*.f64 c a) (*.f64 (neg.f64 b) b))
(*.f64 c a)
(*.f64 a c)
c
a
(*.f64 (*.f64 b b) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 b b))
(*.f64 (neg.f64 b) b)
(*.f64 b (neg.f64 b))
(neg.f64 (*.f64 b b))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
(*.f64 a b)
(*.f64 b a)
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b))))
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (neg.f64 b)))
(*.f64 #s(literal 2 binary64) c)
(*.f64 c #s(literal 2 binary64))
(+.f64 c c)
#s(literal 2 binary64)
(/.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 #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)) (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))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #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)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b)))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))
(/.f64 (neg.f64 c) (neg.f64 b))
(/.f64 c b)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))
(*.f64 (/.f64 b a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 b a))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 a))
(/.f64 (neg.f64 b) a)
(neg.f64 (/.f64 b a))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
(/.f64 (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) a) b)
(/.f64 (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 c b))) (-.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
(/.f64 (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a))) (-.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64)) (pow.f64 (/.f64 c b) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (-.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (*.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))))
(/.f64 (+.f64 (pow.f64 (/.f64 c b) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 b) a) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 c b) (/.f64 c b)) (-.f64 (*.f64 (/.f64 (neg.f64 b) a) (/.f64 (neg.f64 b) a)) (*.f64 (/.f64 c b) (/.f64 (neg.f64 b) a)))))
(/.f64 (neg.f64 (-.f64 (*.f64 c a) (*.f64 b b))) (neg.f64 (*.f64 a b)))
(/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))
(+.f64 (/.f64 (*.f64 c a) (*.f64 a b)) (/.f64 (*.f64 (neg.f64 b) b) (*.f64 a b)))
(+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))
(+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))))
(neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))
(*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 c a))) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 (neg.f64 c) a)))
(neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))
(*.f64 (sqrt.f64 (/.f64 c a)) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 c a)))
(pow.f64 (/.f64 (neg.f64 c) a) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 (neg.f64 c) a))
(exp.f64 (*.f64 (log.f64 (/.f64 (neg.f64 c) a)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 c a) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 c a))
(/.f64 (neg.f64 c) a)
(/.f64 c (neg.f64 a))
(neg.f64 (/.f64 c a))
(/.f64 (neg.f64 c) (neg.f64 a))
(/.f64 c a)
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))))
(*.f64 #s(literal 2 binary64) (/.f64 c #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 c a)))
(*.f64 (sqrt.f64 (*.f64 c a)) (sqrt.f64 #s(literal -4 binary64)))
(pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(*.f64 #s(literal -4 binary64) (*.f64 c a))
(*.f64 (*.f64 c a) #s(literal -4 binary64))
(*.f64 c (*.f64 #s(literal -4 binary64) a))
#s(literal -4 binary64)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.f64 #s(literal 2 binary64) a)) (/.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 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.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 c (*.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) (*.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))
(pow.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 c (*.f64 a #s(literal 4 binary64))) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (+.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 #s(literal -4 binary64) (*.f64 c a))) (pow.f64 b #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 b b)))
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 c (*.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 c (*.f64 a #s(literal 4 binary64))) (*.f64 c (*.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 #s(literal -4 binary64) (*.f64 c a))) (-.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 b b)))))
(-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))
(+.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.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 c a)))
(*.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))
(+.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 c a) #s(literal 4 binary64))
(*.f64 c (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 a #s(literal 4 binary64)) c)
(*.f64 #s(literal 4 binary64) (*.f64 c a))
(*.f64 a #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
(*.f64 #s(literal 2 binary64) a)
(*.f64 a #s(literal 2 binary64))
(+.f64 a a)
(*.f64 #s(literal 2 binary64) (/.f64 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 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 #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 #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)))
#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 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)
(*.f64 c (+.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))
(+.f64 (*.f64 (/.f64 (neg.f64 b) c) c) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c))
(+.f64 (*.f64 c (/.f64 (neg.f64 b) c)) (*.f64 c (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (neg.f64 b) c) (/.f64 (neg.f64 b) c)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))
(/.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 (neg.f64 b) c) (/.f64 (neg.f64 b) c))) (-.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 b) c) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (neg.f64 b) c) (/.f64 (neg.f64 b) c)) (-.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) (*.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.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 (neg.f64 b) c) (/.f64 (neg.f64 b) c)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 (neg.f64 b) c)))))
(-.f64 (/.f64 (neg.f64 b) c) (*.f64 (neg.f64 (sqrt.f64 (/.f64 a c))) (sqrt.f64 #s(literal -4 binary64))))
(+.f64 (/.f64 (neg.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 (neg.f64 b) c))
(*.f64 (sqrt.f64 (/.f64 a c)) (sqrt.f64 #s(literal -4 binary64)))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (/.f64 a c)))
(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)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (/.f64 a c))
(/.f64 (*.f64 #s(literal -4 binary64) a) c)
(/.f64 (neg.f64 a) (neg.f64 c))
(/.f64 a c)
(*.f64 (/.f64 b c) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 b c))
(/.f64 (neg.f64 (neg.f64 b)) (neg.f64 c))
(/.f64 (neg.f64 b) c)
(neg.f64 (/.f64 b c))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) b) a) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) 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 (+.f64 (*.f64 a (/.f64 c b)) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.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 c b)) a) (neg.f64 b)) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (neg.f64 b) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (*.f64 a (/.f64 c b)) (neg.f64 b)) a))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 (neg.f64 b) b))
#s(approx (+ (* c a) (* b (neg b))) (-.f64 (*.f64 c a) (*.f64 b b)))
#s(approx (* c a) (*.f64 c a))
#s(approx a a)
#s(approx (* a b) (*.f64 a b))
#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 (+.f64 (*.f64 a (/.f64 c b)) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 c b)) a) (neg.f64 b)) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (+.f64 (ratio-of-squares.f64 (pow.f64 c #s(literal 3/2 binary64)) (pow.f64 b #s(literal 5/2 binary64))) (*.f64 (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 c c) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) c)) #s(literal -1/8 binary64))) (neg.f64 (*.f64 c (/.f64 (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 b b))))) a) (*.f64 (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))) a) (/.f64 c b)) a) (neg.f64 b)) a))
#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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64)))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) b)
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 a (/.f64 c b))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 a (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 c b))) a) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 c #s(literal 3 binary64)) a)) (pow.f64 b #s(literal 5 binary64)))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) a) b))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (neg.f64 b) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (*.f64 a (/.f64 c b)) (neg.f64 b)) a))
#s(approx (/ (neg b) a) (/.f64 (neg.f64 b) a))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (/.f64 (-.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a)))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (/.f64 (-.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) (*.f64 #s(literal -1/2 binary64) b)) a))
#s(approx (neg (sqrt (neg (/ c a)))) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (sqrt (neg (/ c a))) (sqrt.f64 (/.f64 (neg.f64 c) a)))
#s(approx (neg (/ c a)) (/.f64 (neg.f64 c) a))
#s(approx (/ c a) (/.f64 c a))
#s(approx (sqrt (* (* c a) -4)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#s(approx (* (* c a) -4) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
#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 #s(literal -2 binary64) (/.f64 c b))) 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 #s(literal -2 binary64) (ratio-of-squares.f64 c (pow.f64 b #s(literal 3/2 binary64))))) a) (*.f64 #s(literal -2 binary64) (/.f64 c b))) a) (*.f64 #s(literal 2 binary64) b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
#s(approx (* (* 4 a) c) (*.f64 c (*.f64 a #s(literal 4 binary64))))
#s(approx (* 4 a) (*.f64 a #s(literal 4 binary64)))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (+.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (+.f64 (/.f64 (neg.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 (/.f64 a c) #s(literal -4 binary64)))
#s(approx (/ a c) (/.f64 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)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 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)))) (* 2 a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.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 -4 binary64))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal 1/16 binary64)) (*.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)))))))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))
#s(approx (+ (/ c b) (/ (neg b) a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 c a))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 (+.f64 (/.f64 (*.f64 (neg.f64 b) b) a) c) 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 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64)))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (*.f64 a a)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 3 binary64)) c))) #s(literal -1/2 binary64)) (*.f64 a a)) #s(literal -2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b (/.f64 (*.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 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 (*.f64 (/.f64 (*.f64 a a) c) (/.f64 (pow.f64 b #s(literal 3 binary64)) #s(literal 16 binary64))) #s(literal 1/2 binary64))) (pow.f64 a #s(literal 3 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (*.f64 c a))) (/.f64 b #s(literal -4 binary64))))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#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) (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))) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/8 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)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.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)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/8 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))))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 5/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 7 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64))))) #s(literal 1/16 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 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/8 binary64))) a))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))
#s(approx (+ (/ c b) (/ (neg b) a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (sqrt.f64 (/.f64 (neg.f64 c) a)))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (+.f64 (*.f64 (/.f64 b a) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#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) (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))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal -4 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64)))))) (+.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 b a)) (*.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)))))) a))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (-.f64 (/.f64 (*.f64 b b) a) (*.f64 c #s(literal 4 binary64))) a))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (/.f64 (neg.f64 b) a)) a))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (*.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (neg.f64 b) (*.f64 c a))) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (sqrt.f64 (/.f64 (neg.f64 c) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -1/2 binary64) b)) a)) (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (*.f64 #s(literal -1/128 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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)) (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 (neg.f64 a) (+.f64 (neg.f64 c) (/.f64 (*.f64 b b) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (-.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) (*.f64 #s(literal -1/2 binary64) b)) (neg.f64 a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a b) #s(literal -1/2 binary64)) (*.f64 #s(literal -2 binary64) (/.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))) a)) (sqrt.f64 (*.f64 a (neg.f64 c)))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.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)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.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 (*.f64 (*.f64 a a) (/.f64 (pow.f64 b #s(literal 3 binary64)) c)) #s(literal 1/32 binary64))) a))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 a b))) a)) (sqrt.f64 (*.f64 a (neg.f64 c)))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) #s(literal -2 binary64)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (+.f64 (*.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) #s(literal 2 binary64)) (/.f64 b a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) b) a)) (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 (neg.f64 c) a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 a c))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (*.f64 #s(literal -1/64 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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 (neg.f64 c) a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) #s(literal -2 binary64)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 (neg.f64 c) a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.f64 a) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/64 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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 (neg.f64 c) a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.f64 a) (+.f64 (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 7 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64))))) #s(literal 1/512 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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 (neg.f64 c) a))))) (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal -1/64 binary64)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (sqrt.f64 (/.f64 (neg.f64 c) a)))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (-.f64 (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))
#s(approx (sqrt (* (* c a) -4)) (*.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) #s(literal -2 binary64)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) #s(literal 2 binary64)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (-.f64 (/.f64 b a) (*.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) #s(literal 2 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) b) a)) (*.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) #s(literal 2 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b)))) a)) b) a)) (*.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) #s(literal 2 binary64)))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (neg.f64 a) (-.f64 (/.f64 (*.f64 (neg.f64 b) b) a) (*.f64 #s(literal -4 binary64) c))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) #s(literal -2 binary64)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (neg.f64 a) (+.f64 (*.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) #s(literal 2 binary64)) (/.f64 b a))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal -2 binary64)))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (*.f64 (neg.f64 a) (+.f64 (*.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 (/.f64 b a) c))))
#s(approx (sqrt (* (/ a c) -4)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal -2 binary64)))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.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 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 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 3 binary64))))) #s(literal 1/16 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (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)))) 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 (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (/.f64 (*.f64 (neg.f64 b) b) a) c) b))
#s(approx (* b (neg b)) (*.f64 (neg.f64 b) b))
#s(approx (neg b) (neg.f64 b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 c a))) (/.f64 (/.f64 b a) #s(literal -4 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 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) 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) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) c) #s(literal 16 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -4 binary64))) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64)))) b) (*.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 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 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (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 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (*.f64 c a))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) b) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) (pown3/2s.f64 (*.f64 c a))) (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))))) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (*.f64 c a) #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 c a))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -3 binary64)))) (*.f64 b b)) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 (+.f64 (/.f64 (*.f64 (neg.f64 b) b) a) c) b))
#s(approx (/ c b) (/.f64 c b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (neg.f64 b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (/.f64 b (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#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 c a))) (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) (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)))) b) #s(literal 1 binary64)) b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (- (* b b) (* (* 4 a) c)) (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))
#s(approx (* b b) (*.f64 b b))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (neg.f64 b)))
#s(approx (/ (neg b) c) (/.f64 (neg.f64 b) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) 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 6 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c (*.f64 b b))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 (-.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (+.f64 (*.f64 (neg.f64 a) (*.f64 (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64)) c)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (*.f64 c a) #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))) #s(literal -2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (/.f64 c (*.f64 b b))) (pow.f64 a #s(literal -1 binary64)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (pow.f64 b #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64)))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64)) #s(literal 1 binary64)) 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 c a) #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 (+ (/ c b) (/ (neg b) a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (pow.f64 a #s(literal -1 binary64))) b))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (/.f64 b a) #s(literal -1/2 binary64)))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (-.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) b)) (/.f64 #s(literal 1/2 binary64) a)) b))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (/.f64 b a) #s(literal 1/2 binary64)))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (+.f64 (/.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) b) (/.f64 #s(literal 1/2 binary64) a)) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)) #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 c a) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 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 4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 6 binary64))) (+.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))) b))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (+.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 b b)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (neg.f64 b))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (-.f64 (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) b) #s(literal 1 binary64)) b))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (/.f64 (neg.f64 b) c))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (*.f64 (-.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) b) (pow.f64 c #s(literal -1 binary64))) b))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))) a) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64)))))))))
#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)) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (+.f64 c (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) a))) (+.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 a (ratio-of-squares.f64 c b)))) b)))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.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 c) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (*.f64 a (ratio-of-squares.f64 c b)) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.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 a (ratio-of-squares.f64 c b))) c) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (+.f64 (*.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 (*.f64 a a) (pow.f64 c #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 a (ratio-of-squares.f64 c b)))) 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 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.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 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 c a) #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) (* (* 4 a) c))) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.f64 b) (+.f64 (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64)) #s(literal 1 binary64))))
#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 c a) #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 b) (/ (neg b) a)) (*.f64 (neg.f64 b) (+.f64 (/.f64 (neg.f64 c) (*.f64 b b)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (neg.f64 b) (+.f64 (/.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) b) (/.f64 #s(literal 1/2 binary64) a))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (neg.f64 b) (-.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) b)) (/.f64 #s(literal 1/2 binary64) a))))
#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 (*.f64 (*.f64 a a) (ratio-of-squares.f64 c b)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 c a))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.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 c a) #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 c a) #s(literal 3 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 c a) (*.f64 (*.f64 a a) (ratio-of-squares.f64 c b)))))) b)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (neg.f64 b) (+.f64 (neg.f64 (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) b)) #s(literal 1 binary64))))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg 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 (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 (+.f64 (*.f64 a (/.f64 c (pow.f64 b #s(literal 3 binary64)))) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (*.f64 (+.f64 (*.f64 (+.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) (/.f64 (neg.f64 b) a)))
#s(approx c c)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (/.f64 (neg.f64 b) a) (/.f64 c b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)) c) #s(literal -2 binary64)) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)) a) (*.f64 b b))) (*.f64 (*.f64 b (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 a a) (pow.f64 b #s(literal 3 binary64))) #s(literal 20 binary64)) (*.f64 a a))) #s(literal -1/8 binary64))) (ratio-of-squares.f64 a (pow.f64 b #s(literal 5/2 binary64)))) c) (*.f64 (/.f64 a (pow.f64 b #s(literal 3 binary64))) #s(literal -1/2 binary64)))) c) (pow.f64 b #s(literal -1 binary64))) c) (/.f64 (neg.f64 b) a)))
#s(approx (* 2 c) (*.f64 #s(literal 2 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 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 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 (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 (ratio-of-squares.f64 a (pow.f64 b #s(literal 3/2 binary64))) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 3 binary64)) c)) (pow.f64 b #s(literal 5 binary64)))) c) (*.f64 (/.f64 a b) #s(literal -2 binary64))) c) b))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (neg.f64 (+.f64 (*.f64 (/.f64 b a) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a)))))
#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 (* (/ a c) -4)) (/ (neg b) c)) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (neg.f64 b)) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (*.f64 (*.f64 #s(literal -1/4 binary64) (pown3/2s.f64 (*.f64 c a))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64))))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -4 binary64))) (/.f64 (/.f64 b a) c))) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (sqrt.f64 (pow.f64 (pow.f64 (*.f64 c a) #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) (pown3/2s.f64 (*.f64 c a))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64)))))) c))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (+.f64 (pow.f64 b #s(literal -1 binary64)) (/.f64 (neg.f64 b) (*.f64 c a))) c))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 (+.f64 (/.f64 (*.f64 (neg.f64 b) b) c) a) c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.f64 (neg.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 c c))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 c a))) (/.f64 (/.f64 b a) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+.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))) (*.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))))) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 c a)))) (pow.f64 c #s(literal 3 binary64)))) (-.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 (+.f64 (*.f64 (ratio-of-squares.f64 b (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 3 binary64)) c) #s(literal -1 binary64)))) (*.f64 (/.f64 (/.f64 b a) #s(literal -4 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) (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 (+.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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)) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal -1/8 binary64)) (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 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 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 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)))) #s(literal 1/16 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal -1/8 binary64))) c))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (+.f64 (pow.f64 b #s(literal -1 binary64)) (/.f64 (neg.f64 b) (*.f64 c a))) c))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64)))) c))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (+.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 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))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #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))))) c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 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(literal 1/8 binary64)) (+.f64 (+.f64 (/.f64 b c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 b b) (sqrt.f64 #s(literal -4 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 (neg.f64 c) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #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 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))) c)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (neg.f64 c) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))) (/.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b)))) c)) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))) c)))))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (neg.f64 c) (-.f64 (/.f64 (/.f64 b a) c) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (+ (* c a) (* b (neg b))) (*.f64 (neg.f64 c) (+.f64 (neg.f64 a) (/.f64 (*.f64 b b) c))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))) (*.f64 (/.f64 b a) #s(literal 1/2 binary64))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) (/.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))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)) (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 b #s(literal 3 binary64)) c)) (*.f64 a a)) (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sqrt.f64 (*.f64 c a)) #s(literal -1 binary64)) b) (*.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (/.f64 c a) #s(literal 3 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))))
#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 (sqrt.f64 (*.f64 c a)) #s(literal -1 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/4 binary64) (sqrt.f64 (/.f64 c a))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 b b))) (*.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))))) 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) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 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 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/64 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 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 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 7 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) (sqrt.f64 (pow.f64 (*.f64 (pow.f64 c #s(literal 3 binary64)) a) #s(literal -1 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 (sqrt.f64 (/.f64 (pow.f64 (pow.f64 a #s(literal 3 binary64)) #s(literal -1 binary64)) (pow.f64 c #s(literal 5 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/64 binary64)))))
#s(approx (+ (/ c b) (/ (neg b) a)) (*.f64 (neg.f64 c) (-.f64 (/.f64 (/.f64 b a) c) (pow.f64 b #s(literal -1 binary64)))))
#s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (*.f64 (neg.f64 c) (-.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (*.f64 (neg.f64 c) (+.f64 (*.f64 (/.f64 (/.f64 b a) c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (neg (sqrt (neg (/ c a)))) (sqrt.f64 (/.f64 (neg.f64 c) a)))
#s(approx (sqrt (neg (/ c a))) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))
#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 (sqrt.f64 (*.f64 c a)) #s(literal -1 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) (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 (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 (- (* b b) (* (* 4 a) c)) (*.f64 (neg.f64 c) (-.f64 (/.f64 (*.f64 (neg.f64 b) b) c) (*.f64 #s(literal -4 binary64) a))))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) c) (*.f64 (sqrt.f64 (*.f64 a (neg.f64 c))) #s(literal 2 binary64)))
#s(approx (* (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) 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 (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))
#s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (-.f64 (/.f64 (neg.f64 b) c) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal -2 binary64))))
#s(approx (sqrt (* (/ a c) -4)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64))) #s(literal 2 binary64)))

eval362.0ms (5.3%)

Memory
-14.5MiB live, 379.3MiB allocated; 80ms collecting garbage
Samples
152.0ms2 153×0invalid
72.0ms919×0valid
Compiler

Compiled 36 303 to 2 714 computations (92.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 82.0ms
ival-mult: 59.0ms (71.6% of total)
ival-div: 12.0ms (14.6% of total)
ival-pow: 5.0ms (6.1% of total)
ival-true: 2.0ms (2.4% of total)
ival-sqrt: 2.0ms (2.4% of total)
adjust: 1.0ms (1.2% of total)
ival-assert: 1.0ms (1.2% of total)
exact: 0.0ms (0% of total)

prune72.0ms (1%)

Memory
-4.4MiB live, 92.8MiB allocated; 15ms collecting garbage
Pruning

19 alts after pruning (16 fresh and 3 done)

PrunedKeptTotal
New5526558
Fresh21012
Picked325
Done011
Total55719576
Accuracy
99.8%
Counts
576 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
17.7%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
43.0%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a)))))
46.7%
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))))
38.2%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
41.0%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
36.4%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
55.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
33.0%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
48.6%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (+.f64 c c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
51.4%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
42.7%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (neg.f64 (*.f64 (+.f64 (*.f64 (/.f64 b c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) c))) a))))
45.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
49.0%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
42.8%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))))
45.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))))
39.8%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
3.2%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
40.1%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
50.5%
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (*.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 (neg.f64 b) (*.f64 a c)))))) #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))))
Compiler

Compiled 3 800 to 985 computations (74.1% saved)

regimes55.0ms (0.8%)

Memory
-6.2MiB live, 85.8MiB allocated; 8ms collecting garbage
Counts
44 → 3
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (+.f64 c c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 (/ (- (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))) (/.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))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))) (*.f64 (/.f64 b a) #s(literal -1/2 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))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.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))))))
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
(if (>=.f64 b #s(literal 0 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 #s(approx (sqrt (* (/ c a) -1)) (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 (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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 (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(approx (+ (sqrt (* (/ a c) -4)) (/ (neg b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))))
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 2 binary64)))))))
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 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))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (neg.f64 (*.f64 (+.f64 (*.f64 (/.f64 b c) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -1 binary64)))) c))) a))))
(if (>=.f64 b #s(literal 0 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)) (/.f64 (*.f64 #s(literal 2 binary64) c) #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 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (/.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)) 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))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 c (*.f64 a #s(literal 4 binary64))))))) (+.f64 a a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.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 (-.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 #s(literal 2 binary64) a)) (/.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 (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (- (* b b) (* (* a 4) c))) b) a) (neg.f64 (*.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 (neg.f64 b) (*.f64 a c)))))) #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))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
Calls

4 calls:

17.0ms
a
13.0ms
c
11.0ms
b
10.0ms
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
Results
AccuracySegmentsBranch
89.2%5(if (>=.f64 b #s(literal 0 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)) (/.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))))))
77.3%3a
89.2%3b
77.2%3c
Compiler

Compiled 41 to 29 computations (29.3% saved)

regimes16.0ms (0.2%)

Memory
-14.0MiB live, 32.8MiB allocated; 3ms collecting garbage
Counts
25 → 4
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (+.f64 c c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
Calls

2 calls:

8.0ms
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
7.0ms
b
Results
AccuracySegmentsBranch
75.2%4(if (>=.f64 b #s(literal 0 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)) (/.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))))))
81.7%4b
Compiler

Compiled 39 to 23 computations (41% saved)

regimes8.0ms (0.1%)

Memory
19.2MiB live, 19.2MiB allocated; 0ms collecting garbage
Counts
24 → 2
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
(if (>=.f64 b #s(literal 0 binary64)) #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))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (+.f64 (*.f64 c a) (*.f64 b (neg.f64 b))) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (+.f64 c c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a)))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (neg.f64 c) a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (+.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 c a))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(approx (neg (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a)) (-.f64 (*.f64 (/.f64 b a) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a)))))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a))))
Calls

1 calls:

6.0ms
b
Results
AccuracySegmentsBranch
76.3%2b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes33.0ms (0.5%)

Memory
-23.2MiB live, 27.2MiB allocated; 8ms collecting garbage
Counts
11 → 2
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -1 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (-.f64 (*.f64 c a) (*.f64 b b)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
Calls

3 calls:

25.0ms
a
4.0ms
c
4.0ms
b
Results
AccuracySegmentsBranch
70.5%2c
73.3%2a
72.1%2b
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes7.0ms (0.1%)

Memory
16.6MiB live, 16.6MiB allocated; 0ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a))))))))
Calls

2 calls:

3.0ms
a
3.0ms
b
Results
AccuracySegmentsBranch
72.1%2b
57.3%2a
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes5.0ms (0.1%)

Memory
20.0MiB live, 20.0MiB allocated; 0ms collecting garbage
Counts
5 → 2
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Calls

2 calls:

2.0ms
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
2.0ms
b
Results
AccuracySegmentsBranch
64.7%3(if (>=.f64 b #s(literal 0 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)) (/.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))))))
71.3%2b
Compiler

Compiled 39 to 23 computations (41% saved)

regimes11.0ms (0.2%)

Memory
-29.1MiB live, 15.4MiB allocated; 8ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Calls

2 calls:

9.0ms
b
2.0ms
c
Results
AccuracySegmentsBranch
43.0%2c
69.6%2b
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes2.0ms (0%)

Memory
5.2MiB live, 5.2MiB allocated; 0ms collecting garbage
Counts
3 → 2
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b)))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Calls

1 calls:

2.0ms
b
Results
AccuracySegmentsBranch
68.2%2b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes6.0ms (0.1%)

Memory
12.9MiB live, 12.9MiB allocated; 0ms collecting garbage
Counts
2 → 1
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Calls

4 calls:

1.0ms
c
1.0ms
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
1.0ms
a
1.0ms
b
Results
AccuracySegmentsBranch
38.2%1c
38.2%1a
38.2%1(if (>=.f64 b #s(literal 0 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)) (/.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))))))
38.2%1b
Compiler

Compiled 41 to 29 computations (29.3% saved)

regimes5.0ms (0.1%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

4 calls:

1.0ms
(if (>=.f64 b #s(literal 0 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)) (/.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))))))
1.0ms
a
1.0ms
b
1.0ms
c
Results
AccuracySegmentsBranch
3.2%1b
3.2%1(if (>=.f64 b #s(literal 0 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)) (/.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))))))
3.2%1c
3.2%1a
Compiler

Compiled 41 to 29 computations (29.3% saved)

bsearch78.0ms (1.1%)

Memory
-21.6MiB live, 70.5MiB allocated; 10ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
51.0ms
3.278358072510387e+70
6.76094577652632e+71
22.0ms
-3.892529966277944e+81
-2.1061505285339016e+79
Samples
28.0ms224×0valid
1.0ms11×0invalid
Compiler

Compiled 1 924 to 1 048 computations (45.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-mult: 7.0ms (31.1% of total)
ival-sub: 7.0ms (31.1% of total)
ival-div: 3.0ms (13.3% of total)
ival-add: 1.0ms (4.4% of total)
ival-if: 1.0ms (4.4% of total)
ival-sqrt: 1.0ms (4.4% of total)
ival->=: 1.0ms (4.4% of total)
ival-neg: 1.0ms (4.4% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch73.0ms (1.1%)

Memory
11.6MiB live, 107.0MiB allocated; 24ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
19.0ms
1.2835622620915722e-151
4.160358627578097e-151
44.0ms
-2.8693867986621933e-303
5.5163520799825144e-306
2.0ms
-3.892529966277944e+81
-2.1061505285339016e+79
Samples
26.0ms224×0valid
24.0ms130×0invalid
Compiler

Compiled 2 890 to 1 716 computations (40.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-neg: 12.0ms (32.6% of total)
ival-mult: 10.0ms (27.2% of total)
ival-div: 4.0ms (10.9% of total)
ival-sub: 3.0ms (8.2% of total)
ival-add: 2.0ms (5.4% of total)
ival-if: 2.0ms (5.4% of total)
ival-sqrt: 2.0ms (5.4% of total)
ival->=: 1.0ms (2.7% of total)
exact: 1.0ms (2.7% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch49.0ms (0.7%)

Memory
10.7MiB live, 95.3MiB allocated; 24ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
45.0ms
-3.947765476919094e-55
-2.2821229175105787e-60
Samples
23.0ms144×0valid
5.0ms42×0invalid
Compiler

Compiled 1 166 to 674 computations (42.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-mult: 6.0ms (41.9% of total)
ival-div: 2.0ms (14% of total)
ival-sub: 2.0ms (14% of total)
ival-add: 1.0ms (7% of total)
ival-if: 1.0ms (7% of total)
ival-sqrt: 1.0ms (7% of total)
ival->=: 1.0ms (7% of total)
ival-neg: 1.0ms (7% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch76.0ms (1.1%)

Memory
-23.0MiB live, 49.9MiB allocated; 94ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
72.0ms
-7.100271210068493e+74
-1.7340718769382561e+71
Samples
13.0ms128×0valid
4.0ms41×0invalid
Compiler

Compiled 985 to 578 computations (41.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-mult: 5.0ms (39.6% of total)
ival-div: 2.0ms (15.9% of total)
ival-add: 1.0ms (7.9% of total)
ival-if: 1.0ms (7.9% of total)
ival-sub: 1.0ms (7.9% of total)
ival-sqrt: 1.0ms (7.9% of total)
ival->=: 1.0ms (7.9% of total)
ival-neg: 1.0ms (7.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch37.0ms (0.5%)

Memory
-2.4MiB live, 46.2MiB allocated; 9ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
33.0ms
-1.0618045807234031e-41
-3.947765476919094e-55
Samples
21.0ms160×0valid
3.0ms32×0invalid
Compiler

Compiled 1 301 to 756 computations (41.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-mult: 6.0ms (31.3% of total)
ival-neg: 5.0ms (26.1% of total)
ival-div: 2.0ms (10.4% of total)
ival-sub: 2.0ms (10.4% of total)
ival-add: 1.0ms (5.2% of total)
ival-if: 1.0ms (5.2% of total)
ival-sqrt: 1.0ms (5.2% of total)
ival->=: 1.0ms (5.2% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch11.0ms (0.2%)

Memory
15.2MiB live, 15.2MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
10.0ms
1.2835622620915722e-151
4.160358627578097e-151
Samples
5.0ms48×0valid
2.0ms17×0invalid
Compiler

Compiled 566 to 331 computations (41.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 5.0ms
ival-mult: 2.0ms (42.1% of total)
ival-div: 1.0ms (21.1% of total)
ival-sub: 1.0ms (21.1% of total)
ival-add: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-if: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-sqrt: 0.0ms (0% of total)
ival->=: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)

bsearch35.0ms (0.5%)

Memory
-5.6MiB live, 38.4MiB allocated; 11ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
31.0ms
2.881178465465315e-125
1.3479490500063787e-122
Samples
13.0ms128×0valid
5.0ms45×0invalid
Compiler

Compiled 801 to 442 computations (44.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-mult: 5.0ms (38.9% of total)
ival-div: 2.0ms (15.6% of total)
ival-add: 1.0ms (7.8% of total)
ival-if: 1.0ms (7.8% of total)
ival-sub: 1.0ms (7.8% of total)
ival-sqrt: 1.0ms (7.8% of total)
ival->=: 1.0ms (7.8% of total)
ival-neg: 1.0ms (7.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)

bsearch41.0ms (0.6%)

Memory
-25.4MiB live, 72.2MiB allocated; 19ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
30.0ms
-2.7695858585194256e-289
-2.0579214336043793e-291
Samples
12.0ms68×0invalid
12.0ms112×0valid
Compiler

Compiled 783 to 425 computations (45.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 18.0ms
ival-mult: 5.0ms (27.3% of total)
ival->=: 5.0ms (27.3% of total)
ival-div: 2.0ms (10.9% of total)
ival-sub: 2.0ms (10.9% of total)
ival-add: 1.0ms (5.5% of total)
ival-if: 1.0ms (5.5% of total)
ival-sqrt: 1.0ms (5.5% of total)
ival-neg: 1.0ms (5.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)

simplify58.0ms (0.8%)

Memory
42.7MiB live, 86.9MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01581275
12661265
24081265
36081265
411291265
553601265
Stop Event
node limit
Calls
Call 1
Inputs
(if (<=.f64 b #s(literal -3600000000000000053614100963779815304305500284358445286980298888600186948142759936 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (<=.f64 b #s(literal 434999999999999986342556370421495958307655567262116133897617313217118208 binary64)) #s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))))
(if (<=.f64 b #s(literal -3600000000000000053614100963779815304305500284358445286980298888600186948142759936 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (<=.f64 b #s(literal 3921543657829143/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))) (if (<=.f64 b #s(literal 7223599953759981/29484081443918291814387145163970850710288447034503440846689111720668938768688662906922865040450459121417721679927842538279457692421287442441886205089317937841010900992 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a)))))))
(if (<=.f64 b #s(literal -6151454740732423/1809251394333065553493296640760748560207343510400633813116524750123642650624 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a)))))
(if (<=.f64 a #s(literal -199999999999999990329637623605584395770392181606026710334413639527300071424 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))))
(if (<=.f64 b #s(literal -5521397077432451/13803492693581127574869511724554050904902217944340773110325048447598592 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))))))
(if (<=.f64 b #s(literal 5307134659905293/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal 7740541678258495/11908525658859223294760121268437066290850060053501019099651935423375594096449911575776314174894302258147533153997065059263030913083222523904 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal -2949340299383487/1404447761611184302913519680303925573139044514798677009948672509044786529730476274474284979081308875165000889686495260606709295068862629863225370551870891596701311667381761603721111090634735110308227210563164107569048052205800491261514946176100212790338675864723330454999587858894372783631526221325189251072 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
Outputs
(if (<=.f64 b #s(literal -3600000000000000053614100963779815304305500284358445286980298888600186948142759936 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (<=.f64 b #s(literal 434999999999999986342556370421495958307655567262116133897617313217118208 binary64)) #s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) a))))))
(if (<=.f64 b #s(literal -3600000000000000053614100963779815304305500284358445286980298888600186948142759936 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (<=.f64 b #s(literal 434999999999999986342556370421495958307655567262116133897617313217118208 binary64)) #s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 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 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (-.f64 (/.f64 c b) (/.f64 b a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 a c) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) b)) (neg.f64 a))))))
(if (<=.f64 b #s(literal -3600000000000000053614100963779815304305500284358445286980298888600186948142759936 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (<=.f64 b #s(literal 3921543657829143/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))) (if (<=.f64 b #s(literal 7223599953759981/29484081443918291814387145163970850710288447034503440846689111720668938768688662906922865040450459121417721679927842538279457692421287442441886205089317937841010900992 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a)))))))
(if (<=.f64 b #s(literal -3600000000000000053614100963779815304305500284358445286980298888600186948142759936 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (<=.f64 b #s(literal 3921543657829143/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (if (>= b 0) (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (* (/ (+ (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))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (-.f64 (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) b)))) (if (<=.f64 b #s(literal 7223599953759981/29484081443918291814387145163970850710288447034503440846689111720668938768688662906922865040450459121417721679927842538279457692421287442441886205089317937841010900992 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -4 binary64) c) a)) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (-.f64 (/.f64 c b) (/.f64 b a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (*.f64 (neg.f64 c) a))) (neg.f64 a)))))))
(if (<=.f64 b #s(literal -6151454740732423/1809251394333065553493296640760748560207343510400633813116524750123642650624 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (neg.f64 (*.f64 c a)))) a)))))
(if (<=.f64 b #s(literal -6151454740732423/1809251394333065553493296640760748560207343510400633813116524750123642650624 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (-.f64 (/.f64 c b) (/.f64 b a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 #s(approx (+ (sqrt (* (* a c) -1)) (* 1/2 b)) (sqrt.f64 (*.f64 (neg.f64 c) a))) (neg.f64 a)))))
(if (<=.f64 a #s(literal -199999999999999990329637623605584395770392181606026710334413639527300071424 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))))
(if (<=.f64 a #s(literal -199999999999999990329637623605584395770392181606026710334413639527300071424 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (-.f64 (/.f64 c b) (/.f64 b a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (-.f64 (/.f64 c b) (/.f64 b a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))))
(if (<=.f64 b #s(literal -5521397077432451/13803492693581127574869511724554050904902217944340773110325048447598592 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (+.f64 (/.f64 c b) (/.f64 (neg.f64 b) a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))))))
(if (<=.f64 b #s(literal -5521397077432451/13803492693581127574869511724554050904902217944340773110325048447598592 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (-.f64 (/.f64 c b) (/.f64 b a))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 #s(approx (/ (+ (sqrt (* (* a c) -1)) (* 1/2 b)) a) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))))))
(if (<=.f64 b #s(literal 5307134659905293/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (neg.f64 (/.f64 c a)))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal 5307134659905293/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(approx (* (sqrt (* (/ c a) -4)) -1/2) (neg.f64 (sqrt.f64 (/.f64 (neg.f64 c) a))))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal 7740541678258495/11908525658859223294760121268437066290850060053501019099651935423375594096449911575776314174894302258147533153997065059263030913083222523904 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (neg.f64 (/.f64 c a)))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal 7740541678258495/11908525658859223294760121268437066290850060053501019099651935423375594096449911575776314174894302258147533153997065059263030913083222523904 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (sqrt.f64 (/.f64 (neg.f64 c) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal -2949340299383487/1404447761611184302913519680303925573139044514798677009948672509044786529730476274474284979081308875165000889686495260606709295068862629863225370551870891596701311667381761603721111090634735110308227210563164107569048052205800491261514946176100212790338675864723330454999587858894372783631526221325189251072 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (<=.f64 b #s(literal -2949340299383487/1404447761611184302913519680303925573139044514798677009948672509044786529730476274474284979081308875165000889686495260606709295068862629863225370551870891596701311667381761603721111090634735110308227210563164107569048052205800491261514946176100212790338675864723330454999587858894372783631526221325189251072 binary64)) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 #s(approx (+ (* c a) (* b (neg b))) (*.f64 c a)) (*.f64 a b))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 b))))) (if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) (/.f64 (neg.f64 b) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+ a a)) #s(approx (+ (/ c b) (/ (neg b) a)) (/.f64 c b))) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (neg.f64 b) a)))

derivations289.0ms (4.2%)

Memory
-41.4MiB live, 340.5MiB allocated; 44ms collecting garbage
Stop Event
fuel
Compiler

Compiled 1 274 to 165 computations (87% saved)

preprocess56.0ms (0.8%)

Memory
50.5MiB live, 94.0MiB allocated; 12ms collecting garbage
Compiler

Compiled 2 624 to 370 computations (85.9% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...