jeff quadratic root 1

Time bar (total: 4.7s)

start0.0ms (0%)

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

analyze235.0ms (5%)

Memory
6.9MiB live, 197.1MiB allocated; 39ms 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.3s (27.6%)

Memory
40.6MiB live, 1 821.6MiB allocated; 441ms collecting garbage
Samples
778.0ms8 256×0valid
67.0ms945×0invalid
Precisions
Click to see histograms. Total time spent on operations: 550.0ms
ival-mult!: 259.0ms (47.1% of total)
ival-sqrt: 95.0ms (17.3% of total)
ival-neg: 66.0ms (12% of total)
ival-div!: 62.0ms (11.3% of total)
ival-add!: 32.0ms (5.8% of total)
ival-sub!: 31.0ms (5.6% of total)
adjust: 2.0ms (0.4% of total)
ival-if: 2.0ms (0.4% of total)
ival->=: 1.0ms (0.2% of total)
Bogosity

preprocess47.0ms (1%)

Memory
14.7MiB live, 57.9MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
085393
1267381
2842381
32924379
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.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))))))
Compiler

Compiled 56 to 40 computations (28.6% saved)

series55.0ms (1.2%)

Memory
-17.5MiB live, 79.8MiB allocated; 21ms collecting garbage
Counts
20 → 174
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/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 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 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c 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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#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 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#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 (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#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 (* 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 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (* 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) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (if (>= b 0) (/ (- (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 (* -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 (+ 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 (+ (* -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 (* -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/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#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 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#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 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
Calls

9 calls:

TimeVariablePointExpression
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)))))) (>= 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)))))
10.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
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
@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)))))
4.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)))))

rewrite289.0ms (6.2%)

Memory
4.2MiB live, 274.1MiB allocated; 43ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010648461
010847777
163517717
084587359
Stop Event
iter-limit
node-limit
iter-limit
Counts
194 → 271
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/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 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 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c 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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#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 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#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 (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#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 (* 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 (* -2 b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* b (- (* 4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* b (+ 1 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (* 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) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (if (>= b 0) (/ (- (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 (* -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 (+ 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 (+ (* -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 (* -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/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#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 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#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 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (+.f64 a a)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) (neg.f64 (+.f64 a a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (+.f64 a a))
(-.f64 (/.f64 (neg.f64 b) (+.f64 a a)) (/.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (+.f64 a a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal -1 binary64)) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))
(*.f64 #s(literal -1 binary64) b)
(*.f64 b #s(literal -1 binary64))
(neg.f64 b)
(pow.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 #s(literal -4 binary64) (*.f64 c a))) (*.f64 (*.f64 b b) (*.f64 b b))) (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 b b)))
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) c) (*.f64 (*.f64 a #s(literal 4 binary64)) c))) (fma.f64 b b (*.f64 (*.f64 a #s(literal 4 binary64)) c)))
(/.f64 (fma.f64 #s(literal -64 binary64) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 #s(literal -4 binary64) (*.f64 c a)) (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) (*.f64 b b)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)))) (fma.f64 (*.f64 b b) (*.f64 b b) (fma.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)))))
(fma.f64 (pow.f64 (*.f64 b b) #s(literal -1 binary64)) (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (pow.f64 (*.f64 b b) #s(literal -1 binary64)) (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (pow.f64 (fabs.f64 b) #s(literal 1 binary64)) (pow.f64 (fabs.f64 b) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (pow.f64 (fabs.f64 b) #s(literal 1 binary64)) (pow.f64 (fabs.f64 b) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (pow.f64 (neg.f64 b) #s(literal 1 binary64)) (pow.f64 (neg.f64 b) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (pow.f64 (neg.f64 b) #s(literal 1 binary64)) (pow.f64 (neg.f64 b) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 b b)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 b b)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 b b)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (fabs.f64 b) (fabs.f64 b) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (fabs.f64 b) (fabs.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(fma.f64 #s(literal -4 binary64) (*.f64 c a) (*.f64 b b))
(fma.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))
(fma.f64 #s(literal 4 binary64) (neg.f64 (*.f64 c a)) (*.f64 b b))
(fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(fma.f64 b b (*.f64 (neg.f64 (*.f64 a #s(literal 4 binary64))) c))
(fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 c a)))
(-.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 (*.f64 b b) #s(literal -1 binary64)) (*.f64 (*.f64 b b) (*.f64 b b)))
(*.f64 (pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 b #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 b) #s(literal 1 binary64)) (pow.f64 (fabs.f64 b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 b) #s(literal 1 binary64)) (pow.f64 (neg.f64 b) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 b b)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 b b)))
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b)))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 (sqrt.f64 (*.f64 b b)) #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 b #s(literal 2 binary64))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 b b))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 b 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 (*.f64 b b)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 b 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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))))
(/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)))
(+.f64 (/.f64 c (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))) (/.f64 c (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))))
(*.f64 #s(literal 2 binary64) c)
(*.f64 c #s(literal 2 binary64))
(+.f64 c c)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 b b)) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal -1 binary64))) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)))))
(/.f64 (fma.f64 (*.f64 (*.f64 b b) b) #s(literal -1 binary64) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))))
(fma.f64 #s(literal -1 binary64) b (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))
(fma.f64 b #s(literal -1 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (*.f64 #s(literal 1 binary64) b))
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b))
(+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) a) #s(literal -1/2 binary64)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (fma.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal -1/2 binary64) (/.f64 (*.f64 c a) (sqrt.f64 (*.f64 b b)))) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (fma.f64 (fma.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) b)) (/.f64 c (sqrt.f64 (*.f64 b b)))) a (*.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal -1/2 binary64))) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (/.f64 (fma.f64 a (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c c) c) a) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) #s(literal 2 binary64) (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) b))) a (/.f64 c (sqrt.f64 (*.f64 b b)))) (*.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal -1/2 binary64))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c a)) (sqrt.f64 (*.f64 b b))) b) (sqrt.f64 (*.f64 b b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c c) a) (*.f64 (*.f64 b b) b)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))))) a) b) (sqrt.f64 (*.f64 b b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (-.f64 (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c c) c) a) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) b)))) a (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))))) a) b) (sqrt.f64 (*.f64 b b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (*.f64 b b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) (sqrt.f64 (*.f64 b b))) (sqrt.f64 (*.f64 b b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) b)) (/.f64 c (sqrt.f64 (*.f64 b b))))) a (sqrt.f64 (*.f64 b b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 a (fma.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c c) c) a) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (*.f64 (*.f64 b b) b))) a (*.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))))) (sqrt.f64 (*.f64 b b))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#s(approx (- (* b b) (* (* 4 a) c)) (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
#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 a a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (*.f64 b b)) b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 (/.f64 (*.f64 (*.f64 c c) a) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (sqrt.f64 (*.f64 b b)))) #s(literal 4 binary64) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (*.f64 b b)) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)) (*.f64 b b)))) (*.f64 (/.f64 (*.f64 c c) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (sqrt.f64 (*.f64 b b)))) #s(literal 4 binary64))) a (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (*.f64 b b)) b))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) #s(literal -4 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 c (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)) (*.f64 b b)))) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (sqrt.f64 (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) #s(literal -4 binary64)))) a (fma.f64 (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)) (*.f64 b b)))))) a (*.f64 (/.f64 (*.f64 c c) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (sqrt.f64 (*.f64 b b)))) #s(literal 4 binary64))) a (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (*.f64 b b)) b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (sqrt.f64 (*.f64 b b)) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 c a) (sqrt.f64 (*.f64 b b))) (sqrt.f64 (*.f64 b b))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) b)) (/.f64 c (sqrt.f64 (*.f64 b b))))) a (sqrt.f64 (*.f64 b b))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (fma.f64 a (fma.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c c) c) a) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (*.f64 (*.f64 b b) b))) a (*.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))))) (sqrt.f64 (*.f64 b b))) 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)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) #s(literal -1/4 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) #s(literal -1/4 binary64)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) 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 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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 b a)) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) #s(literal 1/8 binary64)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (fma.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) #s(literal 1/2 binary64) (/.f64 b a))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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)))) a))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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)))) 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 c c) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 (*.f64 c b) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a)))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 (*.f64 c b) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a)) #s(literal -2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b b) b) (/.f64 c (*.f64 (pow.f64 (/.f64 c a) #s(literal 2 binary64)) #s(literal 16 binary64)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) b) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (*.f64 (*.f64 a a) a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) (/.f64 (*.f64 c b) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a)))))) 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 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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 b a)) a))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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 b a)) 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)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (*.f64 (/.f64 b a) #s(literal -1/2 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) b)) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) b (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 a a))) #s(literal -1/16 binary64))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.f64 (/.f64 b a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 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/2 binary64) (*.f64 b b)) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)) b) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 a a))) #s(literal 1/8 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))))) a)) b) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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)))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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)))) a)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a a) (*.f64 a a)))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (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)))) 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))))) (*.f64 (/.f64 c (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)) #s(literal -2 binary64)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 c b) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a)) #s(literal -2 binary64) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (fma.f64 (/.f64 c (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (/.f64 c (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) a))) a))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (fma.f64 (/.f64 c (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 c b) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) #s(literal 2 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 b b) b) (/.f64 c (*.f64 (pow.f64 (/.f64 c a) #s(literal 2 binary64)) #s(literal 16 binary64)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) b) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))))) a) (*.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) #s(literal -2 binary64))) a))) a))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.f64 (/.f64 b a) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 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/2 binary64) (*.f64 b b)) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)) b) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) a)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 a a))) #s(literal -1/8 binary64))) a)) b) a)) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 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 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) a) #s(literal -1/2 binary64)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b a) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 (-.f64 (*.f64 (/.f64 b (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) a)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1/2 binary64) a)) b (*.f64 (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) a) #s(literal -1/2 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64)) a)) #s(literal 1/16 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) a))) b) (/.f64 #s(literal 1/2 binary64) a)) b (*.f64 (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) a) #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 (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 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))) #s(literal -1/2 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) (*.f64 b b)) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))) 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))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))) #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 (fma.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))) (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 5/2 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 b b) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))) (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (- (* b b) (* (* 4 a) c)) (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))) (/.f64 (*.f64 c b) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 b (fma.f64 (*.f64 (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) b) #s(literal -2 binary64) (/.f64 (+.f64 c c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 b (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) (/.f64 c (*.f64 #s(literal 16 binary64) (*.f64 (*.f64 a a) (*.f64 c c))))) b (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))) b (/.f64 (+.f64 c c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))))
#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)))) (fma.f64 (-.f64 (*.f64 (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)))) #s(literal 1/2 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)))) (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 c a))))) 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 (neg.f64 b) a))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (/.f64 #s(literal 1 binary64) a)) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (fma.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a)) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) #s(literal 2 binary64) (-.f64 (fma.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a))) 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 (-.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 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal 2 binary64)) (fma.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 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) #s(literal 2 binary64))) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (fma.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 (fma.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) #s(literal 1 binary64)) b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) #s(literal -4 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))) #s(literal 1 binary64)) b))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 (fma.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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal -2 binary64) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a)) b))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (fma.f64 (*.f64 a a) (*.f64 (*.f64 c c) 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))) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64)) c) a))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c c) a) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal -2 binary64) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (/.f64 (*.f64 c a) b) #s(literal -2 binary64)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 c a (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal -4 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 c a (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal -4 binary64) (fma.f64 #s(literal -2 binary64) (fma.f64 c a (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) 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 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) a) #s(literal 1/2 binary64)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (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 (fma.f64 a (/.f64 (*.f64 c c) (*.f64 b b)) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 c c) a) (*.f64 b b))) c) b)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (/.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 c a) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) a)) #s(literal 1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 c c) a) (*.f64 b b)))) c) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b 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 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal 4 binary64)) (*.f64 #s(literal -2 binary64) (fma.f64 c a (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b 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))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal -4 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 c a (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))))) b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.f64 b) (fma.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) (fma.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) #s(literal 1 binary64))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (neg.f64 b) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) #s(literal -4 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))) #s(literal 1 binary64))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (neg.f64 (/.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) (*.f64 c c))) #s(literal -5/2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 c c) a) (*.f64 b b)))) c) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) #s(literal 2 binary64))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) #s(literal -4 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))) #s(literal 2 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) a) #s(literal -1/2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 (fma.f64 a (/.f64 c (*.f64 (*.f64 b b) b)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b)))) c (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) a) #s(literal -1/2 binary64))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) #s(literal 2 binary64) (/.f64 a (*.f64 (*.f64 b b) b))) c (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b)))) c (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 b b)) b) a) #s(literal -1/2 binary64))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 c (*.f64 (*.f64 b b) b))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))))) c) b) (sqrt.f64 (*.f64 b b))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (-.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) b)))) c (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))))) c) b) (sqrt.f64 (*.f64 b b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (*.f64 (*.f64 b b) b))))) c (sqrt.f64 (*.f64 b b))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (fma.f64 c (fma.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) b)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) c (*.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) #s(literal -2 binary64))) (sqrt.f64 (*.f64 b b))))
#s(approx c c)
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (fma.f64 (/.f64 (*.f64 c a) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (sqrt.f64 (*.f64 b b)))) #s(literal 4 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b))) c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) c) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)) (*.f64 b b)))) (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (sqrt.f64 (*.f64 b b))))) c (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b))) c))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) #s(literal -4 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 a (/.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)) (*.f64 b b)))) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (sqrt.f64 (*.f64 b b))))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) a)) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))))) c (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 (*.f64 b b) b))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a a)) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)) (*.f64 b b)))))) c (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)) (sqrt.f64 (*.f64 b b))))) c (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b))) c))
#s(approx (* 2 c) (+.f64 c c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (*.f64 (*.f64 b b) b))))) c (sqrt.f64 (*.f64 b b))) b))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (fma.f64 c (fma.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) b)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) c (*.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) #s(literal -2 binary64))) (sqrt.f64 (*.f64 b b))) b))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a) #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 (/.f64 b (*.f64 c a)) (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b (*.f64 c a)) (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) a) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))) c))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b (*.f64 c a)) (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a)) (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 (*.f64 c c) (*.f64 c c))) (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) a) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))) c))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (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))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal -1/2 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 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 c c) (*.f64 c c)))) #s(literal 1/8 binary64)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) (fma.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 binary64) (/.f64 b c))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #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 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 c c) (*.f64 c c)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #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 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 c c) (*.f64 c c)))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #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 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 (/.f64 b (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)) #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (+.f64 (neg.f64 (/.f64 (neg.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (*.f64 c c))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (*.f64 (/.f64 b (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)) #s(literal -2 binary64))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 b (/.f64 (neg.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) (/.f64 (*.f64 (*.f64 b b) b) (*.f64 (pow.f64 (/.f64 a c) #s(literal 2 binary64)) #s(literal 16 binary64)))) (*.f64 (*.f64 c c) c))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 c c))) (*.f64 (/.f64 b (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)) #s(literal -2 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (+.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 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 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 c c) (*.f64 c c)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 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)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a) #s(literal 1/2 binary64)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a) #s(literal -1/2 binary64) (*.f64 (/.f64 b (*.f64 c a)) #s(literal 1/2 binary64))) c)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (neg.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a)) #s(literal 1/4 binary64) (*.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 (fma.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 b a) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 c c)) a)) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) a))) c))) c))) c)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.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)))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)) b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 c c))) #s(literal 1/8 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))) c)) b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 c c) (*.f64 c c)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (neg.f64 (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 (*.f64 c c) (*.f64 c c)))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)))) #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (*.f64 c c))) #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 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 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (*.f64 (/.f64 b (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) c)) #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 b (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))) c)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 b (/.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)) (neg.f64 (/.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 (pow.f64 (/.f64 a c) #s(literal 2 binary64)) #s(literal 16 binary64)) c)))) (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) c)) (*.f64 (/.f64 b (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))) #s(literal 2 binary64))) c)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.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)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)) b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 3/2 binary64)) (*.f64 c c))) #s(literal -1/8 binary64))) c)) b) c)) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))

eval40.0ms (0.9%)

Memory
31.4MiB live, 73.8MiB allocated; 12ms collecting garbage
Compiler

Compiled 6 987 to 1 919 computations (72.5% saved)

prune93.0ms (2%)

Memory
-65.9MiB live, 32.9MiB allocated; 103ms collecting garbage
Pruning

16 alts after pruning (16 fresh and 0 done)

PrunedKeptTotal
New24216258
Fresh000
Picked101
Done000
Total24316259
Accuracy
99.1%
Counts
259 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.0%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))))
58.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 (fma.f64 (*.f64 (*.f64 b b) b) #s(literal -1 binary64) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))))))
68.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 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))))
51.9%
(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 b c) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))) c)))))
45.9%
(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 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
48.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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))))))
48.7%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
41.9%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -4 binary64) (*.f64 c a))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -4 binary64) (*.f64 c a)))))))
70.7%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))))
30.9%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a))) (*.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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)))))
26.6%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) 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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)))))
69.5%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) 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))))))
49.5%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 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))))))
43.3%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) 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))))))
69.2%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (-.f64 (/.f64 c (*.f64 b b)) (/.f64 #s(literal 1 binary64) a)) b)) (/.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))))))
74.1%
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
Compiler

Compiled 1 148 to 970 computations (15.5% saved)

series99.0ms (2.1%)

Memory
16.1MiB live, 113.3MiB allocated; 13ms collecting garbage
Counts
64 → 295
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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a)
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(*.f64 b b)
#s(literal -1/2 binary64)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(+.f64 c c)
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(neg.f64 b)
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))
(fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))
(*.f64 c a)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))
(+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) 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))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a) #s(literal 1/2 binary64))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a)
(*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)
(sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(/.f64 a c)
#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)))))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))
(*.f64 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
(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) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64)))
(fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))
(*.f64 a (/.f64 c (*.f64 b b)))
(/.f64 c (*.f64 b b))
#s(literal -2 binary64)
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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (- (sqrt (+ (* -4 (* a c)) (pow b 2))) b))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (sqrt (pow b 2))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))) a)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (sqrt (pow b 2)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (pow b 2)))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* -4 a) #s(hole binary64 (* -4 a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (* c a) #s(hole binary64 (* a c)))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) #s(hole binary64 (/ (* c (sqrt (* -4 (/ a c)))) a)))
#s(approx (* (sqrt (* (/ a c) -4)) c) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (sqrt (* -4 (/ a c)))))
#s(approx (* (/ a c) -4) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* -2 b)))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 2))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (+ 2 (* -2 (/ (* a c) (pow b 2))))))
#s(approx (* a (/ c (* b b))) #s(hole binary64 (/ (* a c) (pow b 2))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (sqrt (* -4 (/ c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (/ b a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -4 (* a c))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* a (+ (* -4 c) (/ (pow b 2) a)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) #s(hole binary64 (* 1/2 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) #s(hole binary64 (* c (sqrt (/ -4 (* a c))))))
#s(approx (* (sqrt (* (/ a c) -4)) c) #s(hole binary64 (* a (* c (sqrt (/ -4 (* a c)))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* a (sqrt (/ -4 (* a c))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* -2 (/ (* a c) (pow b 2)))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* a (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (sqrt (* -4 (/ c a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* -1 (/ (+ (* -1/2 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a))) a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a))) a)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (pow b 2) a)) (* 4 c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#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)) c) a) 1/2) #s(hole binary64 (* -1/2 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) #s(hole binary64 (* -1 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (* (sqrt (* (/ a c) -4)) c) #s(hole binary64 (* -1 (* a (* c (sqrt (/ -4 (* a c))))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* -1 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* -1 (* 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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (* -4 (* a c))) a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (* -4 (* a c)))))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/4 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (sqrt (* -4 (* a c))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (/ b a) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* 1/2 (/ b (* a (sqrt (* -4 (* a c)))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* b (+ (* -1/8 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/2 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (sqrt (* -4 (* a c)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (sqrt (* -4 (* a c))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* 1/2 (/ b (sqrt (* -4 (* a c))))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (* a c))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 5))) (* 1/8 (/ 1 (pow (sqrt (* -4 (* a c))) 3))))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* 2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* 2 (/ (* b c) (pow (sqrt (* -4 (* a c))) 2))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3)))))) (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 4))) (/ c (pow (sqrt (* -4 (* a c))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3))))))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* -1 b))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* 1/2 (/ b (sqrt (* -4 (* a c))))) 1)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (* -1 (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (- (* -1 b) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (* -4 (* a c))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (/ (+ (* -2 (* a c)) (* 2 (pow b 2))) (pow b 2))))
#s(approx (/ c (* b b)) #s(hole binary64 (/ c (pow b 2))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #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 (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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)))) #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 (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ c b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #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 (+ (* (* -4 a) c) (* b b))) #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 c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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)))) #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 (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -2 (/ c (sqrt (pow b 2)))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* -2 (/ (* a c) (pow (sqrt (pow b 2)) 3))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ a (pow (sqrt (pow b 2)) 3))))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (+ c c) #s(hole binary64 (* 2 c)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) #s(hole binary64 (* 1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (/ (sqrt (* -4 (* a c))) c)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))) (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (/ b c)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* c (+ (* -4 a) (/ (pow b 2) c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* c (+ (* -2 (/ a (pow b 2))) (* 2 (/ 1 c))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a c))) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c))))))) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ a c))))))) c)) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c))))))) c)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c))) c)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (pow b 2) c)) (* 4 a))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* -1 (* c (- (* 2 (/ a (pow b 2))) (* 2 (/ 1 c)))))))
Calls

9 calls:

TimeVariablePointExpression
28.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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (>= b 0) b 0 (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 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)))) (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (sqrt (+ (* (* c a) -4) (* b b))) (+ (* (* c a) -4) (* b b)) (* c a) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b))))) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b 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 (* (/ a c) -4)) c) a) 1/2) (/ (* (sqrt (* (/ a c) -4)) c) a) (* (sqrt (* (/ a c) -4)) c) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) 1/2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (+ (* (* a (/ c (* b b))) -2) 2) (* a (/ c (* b b))) (/ c (* b b)) -2)
13.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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (>= b 0) b 0 (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 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)))) (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (sqrt (+ (* (* c a) -4) (* b b))) (+ (* (* c a) -4) (* b b)) (* c a) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b))))) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b 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 (* (/ a c) -4)) c) a) 1/2) (/ (* (sqrt (* (/ a c) -4)) c) a) (* (sqrt (* (/ a c) -4)) c) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) 1/2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (+ (* (* a (/ c (* b b))) -2) 2) (* a (/ c (* b b))) (/ c (* b b)) -2)
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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (>= b 0) b 0 (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 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)))) (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (sqrt (+ (* (* c a) -4) (* b b))) (+ (* (* c a) -4) (* b b)) (* c a) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b))))) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b 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 (* (/ a c) -4)) c) a) 1/2) (/ (* (sqrt (* (/ a c) -4)) c) a) (* (sqrt (* (/ a c) -4)) c) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) 1/2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (+ (* (* a (/ c (* b b))) -2) 2) (* a (/ c (* b b))) (/ c (* b b)) -2)
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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (>= b 0) b 0 (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 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)))) (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (sqrt (+ (* (* c a) -4) (* b b))) (+ (* (* c a) -4) (* b b)) (* c a) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b))))) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b 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 (* (/ a c) -4)) c) a) 1/2) (/ (* (sqrt (* (/ a c) -4)) c) a) (* (sqrt (* (/ a c) -4)) c) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) 1/2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (+ (* (* a (/ c (* b b))) -2) 2) (* a (/ c (* b b))) (/ c (* b b)) -2)
6.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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (>= b 0) b 0 (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg b) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 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)))) (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (sqrt (+ (* (* c a) -4) (* b b))) (+ (* (* c a) -4) (* b b)) (* c a) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b))))) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b 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 (* (/ a c) -4)) c) a) 1/2) (/ (* (sqrt (* (/ a c) -4)) c) a) (* (sqrt (* (/ a c) -4)) c) (sqrt (* (/ a c) -4)) (* (/ a c) -4) (/ a c) 1/2 (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* b b) (* (* 4 a) c)) (* (* 4 a) c) (* 4 a) 4 (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 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (+ (* (* a (/ c (* b b))) -2) 2) (* a (/ c (* b b))) (/ c (* b b)) -2)

rewrite221.0ms (4.8%)

Memory
-19.0MiB live, 205.7MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158113309
0166312388
0846212099
Stop Event
iter-limit
node-limit
iter-limit
Counts
359 → 462
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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a)
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(*.f64 b b)
#s(literal -1/2 binary64)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(+.f64 c c)
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(neg.f64 b)
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))
(fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))
(*.f64 c a)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))
(+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) 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))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a) #s(literal 1/2 binary64))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a)
(*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)
(sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(/.f64 a c)
#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)))))
(+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
(sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))
(*.f64 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) a)
#s(literal 4 binary64)
(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) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))))
(/.f64 (*.f64 #s(literal 2 binary64) c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64)))
(fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))
(*.f64 a (/.f64 c (*.f64 b b)))
(/.f64 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)))))) #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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (- (sqrt (+ (* -4 (* a c)) (pow b 2))) b))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (sqrt (pow b 2))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))) a)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (sqrt (pow b 2)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (pow b 2)))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#s(approx (* -4 a) #s(hole binary64 (* -4 a)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (* c a) #s(hole binary64 (* a c)))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) #s(hole binary64 (/ (* c (sqrt (* -4 (/ a c)))) a)))
#s(approx (* (sqrt (* (/ a c) -4)) c) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (sqrt (* -4 (/ a c)))))
#s(approx (* (/ a c) -4) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (* (* 4 a) c) #s(hole binary64 (* 4 (* a c))))
#s(approx (* 4 a) #s(hole binary64 (* 4 a)))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* -2 b)))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (+ (* -2 b) (* 2 (/ (* a c) b)))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 2))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (+ 2 (* -2 (/ (* a c) (pow b 2))))))
#s(approx (* a (/ c (* b b))) #s(hole binary64 (/ (* a c) (pow b 2))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (sqrt (* -4 (/ c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (/ b a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -4 (* a c))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* a (+ (* -4 c) (/ (pow b 2) a)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) #s(hole binary64 (* 1/2 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) #s(hole binary64 (* c (sqrt (/ -4 (* a c))))))
#s(approx (* (sqrt (* (/ a c) -4)) c) #s(hole binary64 (* a (* c (sqrt (/ -4 (* a c)))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* a (sqrt (/ -4 (* a c))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* a (+ (* -2 (/ b a)) (* 2 (/ c b))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* -2 (/ (* a c) (pow b 2)))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* a (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (sqrt (* -4 (/ c a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* -1 (/ (+ (* -1/2 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a))) a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a))) a)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (pow b 2) a)) (* 4 c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#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)) c) a) 1/2) #s(hole binary64 (* -1/2 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) #s(hole binary64 (* -1 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (* (sqrt (* (/ a c) -4)) c) #s(hole binary64 (* -1 (* a (* c (sqrt (/ -4 (* a c))))))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (* -1 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* -1 (* a (+ (* -2 (/ c b)) (* 2 (/ b a)))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* -1 (* 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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (* -4 (* a c))) a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (* -4 (* a c)))))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/4 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (sqrt (* -4 (* a c))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (/ b a) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* 1/2 (/ b (* a (sqrt (* -4 (* a c)))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* b (+ (* -1/8 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/2 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (sqrt (* -4 (* a c)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (sqrt (* -4 (* a c))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* 1/2 (/ b (sqrt (* -4 (* a c))))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (* a c))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 5))) (* 1/8 (/ 1 (pow (sqrt (* -4 (* a c))) 3))))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* 2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* 2 (/ (* b c) (pow (sqrt (* -4 (* a c))) 2))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3)))))) (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 4))) (/ c (pow (sqrt (* -4 (* a c))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3))))))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* -1 b))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* 1/2 (/ b (sqrt (* -4 (* a c))))) 1)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (* -1 (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (- (* -1 b) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (* -4 (* a c))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (/ (+ (* -2 (pow b 2)) (* 2 (* a c))) b)))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (/ (+ (* -2 (* a c)) (* 2 (pow b 2))) (pow b 2))))
#s(approx (/ c (* b b)) #s(hole binary64 (/ c (pow b 2))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (/ b a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* 2 b)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #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 (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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)))) #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 (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (/ c b))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ c b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #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 (+ (* (* -4 a) c) (* b b))) #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 c) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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)))) #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 (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -2 (/ c (sqrt (pow b 2)))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* -2 (/ (* a c) (pow (sqrt (pow b 2)) 3))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ a (pow (sqrt (pow b 2)) 3))))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (+ c c) #s(hole binary64 (* 2 c)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) #s(hole binary64 (* 1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* (/ a c) -4)) #s(hole binary64 (/ (sqrt (* -4 (* a c))) c)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))) (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (/ b c)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* c (+ (* -4 a) (/ (pow b 2) c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* c (+ (* -2 (/ b c)) (* 2 (/ a b))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* c (+ (* -2 (/ a (pow b 2))) (* 2 (/ 1 c))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a c))) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c))))))) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ a c))))))) c)) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c))))))) c)))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c))) c)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (pow b 2) c)) (* 4 a))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) #s(hole binary64 (* -1 (* c (+ (* -2 (/ a b)) (* 2 (/ b c)))))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(hole binary64 (* -1 (* 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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (*.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) #s(literal -1/2 binary64)) a)
(/.f64 (neg.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)) (neg.f64 a))
(/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a)
(+.f64 (/.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) a) (/.f64 b a))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 b b)) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(pow.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c) (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b)))))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))
(fma.f64 #s(literal 4 binary64) (neg.f64 (*.f64 a c)) (*.f64 b b))
(-.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (neg.f64 b) b))
(+.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b))
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(+.f64 (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(literal 2 binary64) c)
(/.f64 (-.f64 (*.f64 c c) (*.f64 c c)) (-.f64 c c))
(/.f64 (fma.f64 (*.f64 c c) c (*.f64 (*.f64 c c) c)) (fma.f64 c c (-.f64 (*.f64 c c) (*.f64 c c))))
(+.f64 c c)
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 b b)) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (+.f64 a a)) (/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))) (neg.f64 (+.f64 a a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (+.f64 a a))
(-.f64 (/.f64 (neg.f64 b) (+.f64 a a)) (/.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (+.f64 a a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (fma.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (*.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))))
(-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(*.f64 #s(literal -1 binary64) b)
(neg.f64 b)
(pow.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(/.f64 (-.f64 (*.f64 c c) (*.f64 c c)) (-.f64 c c))
(/.f64 (fma.f64 (*.f64 c c) c (*.f64 (*.f64 c c) c)) (fma.f64 c c (-.f64 (*.f64 c c) (*.f64 c c))))
(+.f64 c c)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))))
(fma.f64 #s(literal -1 binary64) b (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (+.f64 a a)) (/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))) (neg.f64 (+.f64 a a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (+.f64 a a))
(-.f64 (/.f64 (neg.f64 b) (+.f64 a a)) (/.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) (+.f64 a a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (fma.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(pow.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 (*.f64 c a) #s(literal -4 binary64))) (*.f64 (*.f64 b b) (*.f64 b b))) (-.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 b b)))
(/.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))) (fma.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 (*.f64 c a) #s(literal -4 binary64)) (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 b b)))))
(fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))
(fma.f64 c (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
(-.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 (neg.f64 b) b))
(+.f64 (*.f64 (*.f64 c a) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 c a)
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))))))
(fma.f64 #s(literal -1 binary64) b (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 c a)) #s(literal 1/2 binary64))) (/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.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 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 c a)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 c a)) #s(literal 1/2 binary64))
(/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) #s(literal 1/2 binary64)) a)
(*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) (/.f64 c a))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)) (neg.f64 a))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) a)
(*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)
(*.f64 (sqrt.f64 (/.f64 a c)) (sqrt.f64 #s(literal -4 binary64)))
(pow.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64)))
(*.f64 (/.f64 a c) #s(literal -4 binary64))
(/.f64 (*.f64 a #s(literal -4 binary64)) c)
(/.f64 (neg.f64 a) (neg.f64 c))
(/.f64 a c)
#s(literal 1/2 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))
(/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
(fma.f64 #s(literal -1 binary64) b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
(+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
(pow.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) a) c) (*.f64 (*.f64 #s(literal 4 binary64) a) c))) (fma.f64 b b (*.f64 (*.f64 #s(literal 4 binary64) a) c)))
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) a) c) #s(literal 3 binary64))) (fma.f64 (*.f64 b b) (*.f64 b b) (fma.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)))))
(fma.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(fma.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(fma.f64 (fabs.f64 b) (fabs.f64 b) (*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(fma.f64 (fabs.f64 b) (fabs.f64 b) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(fma.f64 b b (*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c))
(+.f64 (*.f64 b b) (*.f64 (neg.f64 (*.f64 #s(literal 4 binary64) a)) c))
(+.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal 4 binary64) a) c)
(*.f64 #s(literal 4 binary64) (*.f64 a 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 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (+.f64 a a)) (/.f64 (+.f64 c c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64))))))
(/.f64 (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.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 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (neg.f64 (+.f64 a a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (+.f64 a a))
(-.f64 (/.f64 (neg.f64 b) (+.f64 a a)) (/.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (+.f64 a a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) #s(literal 3 binary64))) (fma.f64 b b (fma.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
(*.f64 #s(literal 2 binary64) (/.f64 c #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64))))))
(/.f64 (+.f64 c c) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64))))
(*.f64 (neg.f64 b) (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64)))
(neg.f64 (*.f64 b (fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64))))
(fma.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) (neg.f64 b) (*.f64 #s(literal 2 binary64) (neg.f64 b)))
(fma.f64 (neg.f64 b) (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) (*.f64 (neg.f64 b) #s(literal 2 binary64)))
(+.f64 (*.f64 (neg.f64 b) (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)))) (*.f64 (neg.f64 b) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) (neg.f64 b)) (*.f64 #s(literal 2 binary64) (neg.f64 b)))
(/.f64 (-.f64 (*.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)))) #s(literal 4 binary64)) (-.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))
(fma.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64)) #s(literal 2 binary64))
(+.f64 (*.f64 a (*.f64 (/.f64 c (*.f64 b b)) #s(literal -2 binary64))) #s(literal 2 binary64))
(*.f64 a (/.f64 c (*.f64 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(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 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b)))) a))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))) a))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 c (sqrt.f64 (*.f64 b b)))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 (+.f64 a a) c) (sqrt.f64 (*.f64 b b))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))) a))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (sqrt.f64 (*.f64 b b))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 (+.f64 a a) c) (sqrt.f64 (*.f64 b b))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (sqrt.f64 (*.f64 b b)))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 (+.f64 a a) c) (sqrt.f64 (*.f64 b b)))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
#s(approx (+ (* (* -4 a) c) (* b b)) (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
#s(approx (* -4 a) (*.f64 #s(literal -4 binary64) a))
#s(approx a a)
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (*.f64 b b)) b)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 c c))) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 a (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 c c)) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 c c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 a (*.f64 #s(literal -2 binary64) (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (*.f64 c (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (*.f64 (sqrt.f64 (*.f64 b b)) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (-.f64 (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 (+.f64 a a) c) (sqrt.f64 (*.f64 b b)))) b))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))) b))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (/.f64 (*.f64 (+.f64 a a) c) (sqrt.f64 (*.f64 b b))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 a (fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (* 2 a) (+.f64 a a))
#s(approx (* c a) (*.f64 a c))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) a))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
#s(approx (* (sqrt (* (/ a c) -4)) c) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (sqrt (* (/ a c) -4)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
#s(approx (* (/ a c) -4) (*.f64 #s(literal -4 binary64) (/.f64 a c)))
#s(approx (/ a c) (/.f64 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 (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (*.f64 #s(literal -2 binary64) b))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (fma.f64 #s(literal -2 binary64) b (/.f64 (*.f64 (+.f64 a a) c) b)))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(literal 2 binary64))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b))))
#s(approx (* a (/ c (* b b))) (*.f64 a (/.f64 c (*.f64 b b))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 a (fma.f64 #s(literal -4 binary64) c (/.f64 (*.f64 b b) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 (+.f64 c c) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))) a))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))) a))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 2 binary64)))) (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 (*.f64 a a) a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))) a))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (neg.f64 b) a))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (-.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (/.f64 b a))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 a (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) (/.f64 b a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (-.f64 (/.f64 (neg.f64 b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 a (-.f64 (/.f64 (*.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) (*.f64 (*.f64 #s(literal 1/2 binary64) c) (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (* (sqrt (* (/ a c) -4)) c) (*.f64 (*.f64 a c) (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (sqrt (* (/ a c) -4)) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (/.f64 (*.f64 (+.f64 a a) c) b))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 b a) (/.f64 (+.f64 c c) b))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a c)) (*.f64 b b)))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/2 binary64) b)) a)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 b) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (neg.f64 (/.f64 (+.f64 (neg.f64 b) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))) a))) a))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (neg.f64 b) a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (-.f64 b (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (+.f64 b (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a))) a))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (neg.f64 (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (neg.f64 (*.f64 a (-.f64 (neg.f64 (/.f64 (*.f64 b b) a)) (*.f64 #s(literal -4 binary64) c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 #s(literal -2 binary64) (/.f64 c (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) a))) a)) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 2 binary64)))) (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a))) a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) a)) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) b) a))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)) b) a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (-.f64 (/.f64 b a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c 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/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) b) a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)) b) a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#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 (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) (*.f64 (*.f64 #s(literal -1/2 binary64) c) (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) (neg.f64 (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (* (sqrt (* (/ a c) -4)) c) (neg.f64 (*.f64 (*.f64 a c) (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (sqrt (* (/ a c) -4)) (neg.f64 (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (neg.f64 (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c b) (/.f64 (+.f64 b b) a)))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (neg.f64 (*.f64 a (-.f64 (/.f64 (+.f64 c c) (*.f64 b b)) (/.f64 #s(literal 2 binary64) a)))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) a)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a) (*.f64 b (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (*.f64 a (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/4 binary64) (*.f64 a (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (/.f64 #s(literal 1 binary64) a)) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 a (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (/.f64 #s(literal 1 binary64) a)) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (-.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 5/2 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (/.f64 c (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 (+.f64 c c) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (*.f64 b (fma.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (*.f64 b (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 #s(literal 0 binary64) (/.f64 c (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 2 binary64)))) (*.f64 (/.f64 c (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (neg.f64 b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) #s(literal 1 binary64)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) #s(literal 1 binary64)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a) (*.f64 b (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (*.f64 a (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/4 binary64) (*.f64 a (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (neg.f64 b) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 b b)) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (neg b) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 5/2 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
#s(approx (- (* b b) (* (* 4 a) c)) (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (/.f64 c (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 (+.f64 c c) (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (*.f64 b (fma.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (*.f64 b (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 #s(literal 0 binary64) (/.f64 c (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 2 binary64)))) (*.f64 (/.f64 c (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (neg.f64 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) #s(literal 1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) #s(literal 1 binary64)))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (neg.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (-.f64 (neg.f64 b) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (-.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 b b)) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (+.f64 a a) c)) b))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 a c) (*.f64 #s(literal 2 binary64) (*.f64 b b))) (*.f64 b b)))
#s(approx (/ c (* b b)) (/.f64 c (*.f64 b b)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/.f64 (neg.f64 b) a))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 b (-.f64 (/.f64 c (*.f64 b b)) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 b (-.f64 (+.f64 (/.f64 c (*.f64 b b)) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (+.f64 (/.f64 c (*.f64 b b)) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b)))))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b b) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (fma.f64 #s(literal -2 binary64) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b)))) (/.f64 #s(literal 2 binary64) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (fma.f64 #s(literal -2 binary64) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b)))) (/.f64 #s(literal 2 binary64) a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b b))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 b (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 b (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 b (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 b (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b)))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 a (/.f64 c (*.f64 b b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (neg.f64 (*.f64 a (*.f64 c (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 a a) c)) (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b)))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 (*.f64 #s(literal -2 binary64) a) c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 b (-.f64 (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b)) #s(literal 2 binary64))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 b (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 b (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.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 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) a)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (neg.f64 b)))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)) a)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (/.f64 c b)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (/.f64 (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))) b)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (/.f64 (+.f64 c (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (/.f64 (+.f64 c (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 a (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 c c) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 a (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))))))) b)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 (*.f64 #s(literal -2 binary64) a) c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))))) b)))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 (neg.f64 b) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b)))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 (neg.f64 b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 (neg.f64 b) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (neg.f64 (/.f64 (+.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) (*.f64 c c))) #s(literal -5/2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 (neg.f64 b) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a a) c) (*.f64 b b)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 (neg.f64 b) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 (neg.f64 b) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (*.f64 (+.f64 a a) c)) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b 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))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))))) b)))
#s(approx (if (>= b 0) (/ (- (neg b) (sqrt (+ (* (* c a) -4) (* b b)))) (* 2 a)) (/ (* 2 c) (+ (neg b) (sqrt (+ (* (* c a) -4) (* b b)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) a)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (neg.f64 b)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (/.f64 c (sqrt.f64 (*.f64 b b)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (*.f64 c (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 a (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (*.f64 c (fma.f64 c (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 a (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 c (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 b b)))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 c (-.f64 (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 b b)))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx c c)
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 c (fma.f64 c (fma.f64 (*.f64 #s(literal -2 binary64) c) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (/.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (*.f64 c (fma.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 a (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 c (*.f64 #s(literal -2 binary64) (fma.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (*.f64 (sqrt.f64 (*.f64 b b)) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))))) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))
#s(approx (+ c c) (+.f64 c c))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) b))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) b))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 c (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 c (fma.f64 c (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (* (/ (* (sqrt (* (/ a c) -4)) c) a) 1/2) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
#s(approx (sqrt (* (/ a c) -4)) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) c))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) a))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 c (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 b (*.f64 a c)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 c c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 b (*.f64 a c)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a (*.f64 c c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 (*.f64 a (*.f64 (*.f64 c c) (*.f64 c c))) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a (*.f64 c c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 (*.f64 c c) (*.f64 c c))) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a (*.f64 c c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 c (fma.f64 #s(literal -4 binary64) a (/.f64 (*.f64 b b) c))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+.f64 (+.f64 (neg.f64 (/.f64 (neg.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 c c))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 (+.f64 b b) (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (-.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 b (/.f64 (neg.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (/.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 2 binary64)))) (*.f64 (*.f64 c c) c))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (fma.f64 #s(literal -2 binary64) (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (neg.f64 b) c))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 c (-.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 b c))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (*.f64 c (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) (/.f64 b c))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 c (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 c (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 c (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c))))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 c (-.f64 (/.f64 (*.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 b c) (/.f64 (+.f64 a a) b))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (*.f64 b b)) (/.f64 #s(literal 2 binary64) c))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (*.f64 #s(literal 1/2 binary64) (/.f64 b (*.f64 a c)))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 a c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) c)) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (*.f64 c (+.f64 (/.f64 (neg.f64 b) (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (*.f64 c (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b a)) c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (*.f64 c (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) (/.f64 b a)) c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (neg.f64 b) c)))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (-.f64 b (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c))))))
#s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (+.f64 b (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) c))) c))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (neg.f64 (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (sqrt (+ (* (* -4 a) c) (* b b))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (*.f64 b b) c)) (*.f64 #s(literal -4 binary64) a)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (-.f64 (/.f64 (+.f64 b b) (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 b (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) c)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) b) (*.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 2 binary64))))) (/.f64 (*.f64 b (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) c)) (/.f64 (+.f64 b b) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) b) c))))))
#s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) c)) b) c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (-.f64 (/.f64 b c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a 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/2 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) b) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) b) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#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 (* (neg b) (+ (* (* a (/ c (* b b))) -2) 2)) (neg.f64 (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a b) (/.f64 (+.f64 b b) c)))))
#s(approx (+ (* (* a (/ c (* b b))) -2) 2) (neg.f64 (*.f64 c (-.f64 (/.f64 (+.f64 a a) (*.f64 b b)) (/.f64 #s(literal 2 binary64) c)))))

eval123.0ms (2.6%)

Memory
21.4MiB live, 165.4MiB allocated; 27ms collecting garbage
Compiler

Compiled 10 952 to 3 331 computations (69.6% saved)

prune60.0ms (1.3%)

Memory
-13.4MiB live, 83.1MiB allocated; 20ms collecting garbage
Pruning

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New45917476
Fresh8311
Picked505
Done000
Total47220492
Accuracy
99.8%
Counts
492 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
69.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) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) #s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(literal 2 binary64))))))
37.0%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
70.7%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))))
30.9%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a))) (*.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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)))))
26.6%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) 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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)))))
31.1%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
32.8%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
52.5%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))) #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))))))
38.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
74.0%
#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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
58.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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (/.f64 (-.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))))))
52.0%
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) #s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c))))))))
45.9%
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
48.4%
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
41.9%
#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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
48.7%
#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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
69.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 #s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b b)) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
49.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 (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
69.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)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
43.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)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
Compiler

Compiled 1 864 to 1 534 computations (17.7% saved)

series64.0ms (1.4%)

Memory
20.0MiB live, 154.3MiB allocated; 15ms collecting garbage
Counts
67 → 308
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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a)
(*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
#s(literal -1/2 binary64)
(+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
(sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
(fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))
(+.f64 c c)
(-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) 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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(*.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a)
(+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
(*.f64 b b)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
(neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))
(*.f64 #s(literal -4 binary64) (/.f64 c a))
(/.f64 c a)
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(neg.f64 b)
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)))
(neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
(/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)
(*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))
(*.f64 #s(literal -4 binary64) (/.f64 a c))
(/.f64 a c)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a)
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
#s(literal -2 binary64)
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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (- (sqrt (+ (* -4 (* a c)) (pow b 2))) b))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (+ b (sqrt (pow b 2))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (sqrt (pow b 2)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 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 (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (sqrt (pow b 2))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (neg (* a (sqrt (* -4 (/ c a))))) #s(hole binary64 (* -1 (sqrt (* -4 (* a c))))))
#s(approx (* a (sqrt (* -4 (/ c a)))) #s(hole binary64 (sqrt (* -4 (* a c)))))
#s(approx (sqrt (* -4 (/ c a))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) a)))
#s(approx (* -4 (/ c a)) #s(hole binary64 (* -4 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (/ (* c (sqrt (* -4 (/ a c)))) a)))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (sqrt (* -4 (/ a c)))))
#s(approx (* -4 (/ a c)) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (/ b a)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* a (+ (* -4 c) (/ (pow b 2) a)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (sqrt (* -4 (/ c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (* c (sqrt (/ -4 (* a c))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* a (* c (sqrt (/ -4 (* a c)))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* a (sqrt (/ -4 (* a c))))))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (/ -2 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* 1/2 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* 1/2 (/ b a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ (* -1/2 b) (* 1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)) (* -1/2 (sqrt (* -4 (/ c a)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a)) (* -1/2 b)) a)) (* -1/2 (sqrt (* -4 (/ c a)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a))) a)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (pow b 2) a)) (* 4 c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (sqrt (* -4 (/ c a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* -1 (/ (+ (* -1/2 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a))) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* -1 (* a (* c (sqrt (/ -4 (* a c))))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* -1 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (/ 2 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (* -4 (* a c))) a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (* -4 (* a c)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/4 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (* 1/2 (/ 1 a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (sqrt (* -4 (* a c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 b) (* -1/2 (sqrt (* -4 (* a c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (* a c)))) (* b (- (* -1/4 (/ b (sqrt (* -4 (* a c))))) 1/2)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (* a c)))) (* b (- (* b (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/4 (/ 1 (sqrt (* -4 (* a c))))))) 1/2)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (sqrt (* -4 (* a c))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* 1/2 (/ b (sqrt (* -4 (* a c))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (* a c))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 5))) (* 1/8 (/ 1 (pow (sqrt (* -4 (* a c))) 3))))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* 2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* 2 (/ (* b c) (pow (sqrt (* -4 (* a c))) 2))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3)))))) (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 4))) (/ c (pow (sqrt (* -4 (* a c))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3))))))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* -1 b))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* 1/2 (/ b (sqrt (* -4 (* a c))))) 1)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (/ b a) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* 1/2 (/ b (* a (sqrt (* -4 (* a c)))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* b (+ (* -1/8 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/2 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) 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 (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* b (- (+ (/ (* a c) (pow b 2)) (/ (* (pow a 2) (pow c 2)) (pow b 4))) 1))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (/ (* a c) (pow b 2)) (/ (* (pow a 2) (pow c 2)) (pow b 4)))) 1))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* 2 b)))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #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) (* (* -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 c) (- (sqrt (+ (* b b) (* (* -4 a) 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 (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (- (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 (* 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 (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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) 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 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) 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 (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (* a c) b))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* a c) (/ (* (pow a 2) (pow c 2)) (pow b 2))) b))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 2 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* a c) (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* a c) (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ 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 (+ 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))) (* -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 (* -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 c) (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ c b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (- (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 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* c (+ (/ a (sqrt (pow b 2))) (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* c (+ (* c (+ (* 2 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))) (/ a (sqrt (pow b 2))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (+ c c) #s(hole binary64 (* 2 c)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -2 (/ c (sqrt (pow b 2)))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* -2 (/ (* a c) (pow (sqrt (pow b 2)) 3))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ a (pow (sqrt (pow b 2)) 3))))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) c)))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (* -2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (* -1/2 (/ b c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (+ (* -1/2 (/ b c)) (* -1/4 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (+ (* -1/2 (/ b c)) (+ (* -1/4 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (/ b c)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* c (+ (* -4 a) (/ (pow b 2) c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))) (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* 1/2 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (* 1/2 (/ b c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 b) (* 1/4 (/ (pow b 2) (* c (sqrt (* -4 (/ a c))))))) c)) (* -1/2 (sqrt (* -4 (/ a c)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (sqrt (* -4 (/ a c))))) (* 1/16 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* -1/2 b)) c)) (* -1/2 (sqrt (* -4 (/ a c)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c))))))) c)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c))) c)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (pow b 2) c)) (* 4 a))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a c))) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c))))))) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ a c))))))) c)) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
Calls

9 calls:

TimeVariablePointExpression
9.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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (>= b 0) b 0 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (sqrt (+ (* b b) (* (* -4 a) c))) (+ (* b b) (* (* -4 a) c)) (* (* -4 a) c) (* -4 a) -4 a c (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* b b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* a (sqrt (* -4 (/ c a))))) (* a (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) (* 2 a) 2 (/ (* 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))) (- (* 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/ -2 (sqrt (* -4 (/ a c)))) -2)
9.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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (>= b 0) b 0 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (sqrt (+ (* b b) (* (* -4 a) c))) (+ (* b b) (* (* -4 a) c)) (* (* -4 a) c) (* -4 a) -4 a c (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* b b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* a (sqrt (* -4 (/ c a))))) (* a (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) (* 2 a) 2 (/ (* 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))) (- (* 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/ -2 (sqrt (* -4 (/ a c)))) -2)
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)))))) (if (>= b 0) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (>= b 0) b 0 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (sqrt (+ (* b b) (* (* -4 a) c))) (+ (* b b) (* (* -4 a) c)) (* (* -4 a) c) (* -4 a) -4 a c (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* b b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* a (sqrt (* -4 (/ c a))))) (* a (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) (* 2 a) 2 (/ (* 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))) (- (* 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/ -2 (sqrt (* -4 (/ a c)))) -2)
6.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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (>= b 0) b 0 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (sqrt (+ (* b b) (* (* -4 a) c))) (+ (* b b) (* (* -4 a) c)) (* (* -4 a) c) (* -4 a) -4 a c (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* b b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* a (sqrt (* -4 (/ c a))))) (* a (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) (* 2 a) 2 (/ (* 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))) (- (* 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/ -2 (sqrt (* -4 (/ a c)))) -2)
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)))))) (if (>= b 0) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (>= b 0) b 0 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (sqrt (+ (* b b) (* (* -4 a) c))) (+ (* b b) (* (* -4 a) c)) (* (* -4 a) c) (* -4 a) -4 a c (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* b b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* a (sqrt (* -4 (/ c a))))) (* a (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) (* 2 a) 2 (/ (* 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))) (- (* 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/ -2 (sqrt (* -4 (/ a c)))) -2)

rewrite295.0ms (6.3%)

Memory
-12.4MiB live, 325.9MiB allocated; 55ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0164214379
0171813419
0869813175
Stop Event
iter-limit
node-limit
iter-limit
Counts
375 → 457
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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a)
(*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
#s(literal -1/2 binary64)
(+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
(sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
(fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))
(+.f64 c c)
(-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) 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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(*.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a)
(+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
(*.f64 b b)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
(neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))
(*.f64 #s(literal -4 binary64) (/.f64 c a))
(/.f64 c a)
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(neg.f64 b)
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)))
(neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
(/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)
(*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))
(*.f64 #s(literal -4 binary64) (/.f64 a c))
(/.f64 a c)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a)
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
#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)))))) #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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (- (sqrt (+ (* -4 (* a c)) (pow b 2))) b))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (+ b (sqrt (pow b 2))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (sqrt (pow b 2)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 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 (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (sqrt (pow b 2))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (neg (* a (sqrt (* -4 (/ c a))))) #s(hole binary64 (* -1 (sqrt (* -4 (* a c))))))
#s(approx (* a (sqrt (* -4 (/ c a)))) #s(hole binary64 (sqrt (* -4 (* a c)))))
#s(approx (sqrt (* -4 (/ c a))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) a)))
#s(approx (* -4 (/ c a)) #s(hole binary64 (* -4 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (/ (* c (sqrt (* -4 (/ a c)))) a)))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (sqrt (* -4 (/ a c)))))
#s(approx (* -4 (/ a c)) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (/ b a)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* a (+ (* -4 c) (/ (pow b 2) a)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (sqrt (* -4 (/ c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (* c (sqrt (/ -4 (* a c))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* a (* c (sqrt (/ -4 (* a c)))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* a (sqrt (/ -4 (* a c))))))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (/ -2 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* 1/2 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* 1/2 (/ b a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ (* -1/2 b) (* 1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)) (* -1/2 (sqrt (* -4 (/ c a)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a)) (* -1/2 b)) a)) (* -1/2 (sqrt (* -4 (/ c a)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a))) a)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (pow b 2) a)) (* 4 c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (sqrt (* -4 (/ c a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* -1 (/ (+ (* -1/2 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a))) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* -1 (* a (* c (sqrt (/ -4 (* a c))))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* -1 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (/ 2 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (* -4 (* a c))) a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (* -4 (* a c)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/4 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (* 1/2 (/ 1 a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (sqrt (* -4 (* a c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 b) (* -1/2 (sqrt (* -4 (* a c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (* a c)))) (* b (- (* -1/4 (/ b (sqrt (* -4 (* a c))))) 1/2)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (* a c)))) (* b (- (* b (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/4 (/ 1 (sqrt (* -4 (* a c))))))) 1/2)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (sqrt (* -4 (* a c))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* 1/2 (/ b (sqrt (* -4 (* a c))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (+ 1 (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (* a c))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 5))) (* 1/8 (/ 1 (pow (sqrt (* -4 (* a c))) 3))))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* 2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* 2 (/ (* b c) (pow (sqrt (* -4 (* a c))) 2))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3)))))) (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 4))) (/ c (pow (sqrt (* -4 (* a c))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3))))))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* -1 b))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* 1/2 (/ b (sqrt (* -4 (* a c))))) 1)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (/ b a) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* 1/2 (/ b (* a (sqrt (* -4 (* a c)))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* b (+ (* -1/8 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/2 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) 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 (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* b (- (/ (* a c) (pow b 2)) 1))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* b (- (+ (/ (* a c) (pow b 2)) (/ (* (pow a 2) (pow c 2)) (pow b 4))) 1))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* b (- (+ (* 2 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (/ (* a c) (pow b 2)) (/ (* (pow a 2) (pow c 2)) (pow b 4)))) 1))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* 2 b)))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* b (+ 2 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* b (+ 2 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #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) (* (* -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 c) (- (sqrt (+ (* b b) (* (* -4 a) 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 (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (/ (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* -2 (* a c)) (+ (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -1/2 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6)))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (- (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 (* 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 (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) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) 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 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) 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 (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (* a c) b))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* a c) (/ (* (pow a 2) (pow c 2)) (pow b 2))) b))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 2 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* a c) (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (+ (* 4 (* (pow a 4) (pow c 4))) (* 16 (* (pow a 4) (pow c 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 3) (pow c 3)) (pow b 4))) (+ (* a c) (/ (* (pow a 2) (pow c 2)) (pow b 2))))) b))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* 2 (/ (* a c) b))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b))))
#s(approx (+ 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 (+ 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))) (* -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 (* -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 c) (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) 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) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ c b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (- (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 (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* c (+ (/ a (sqrt (pow b 2))) (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* c (+ (* c (+ (* 2 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))) (/ a (sqrt (pow b 2))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (+ b (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (+ c c) #s(hole binary64 (* 2 c)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -2 (/ c (sqrt (pow b 2)))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* -2 (/ (* a c) (pow (sqrt (pow b 2)) 3))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ a (pow (sqrt (pow b 2)) 3))))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) c)))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) #s(hole binary64 (* -2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1/2 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (* -1/2 (/ b c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (+ (* -1/2 (/ b c)) (* -1/4 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (+ (* -1/2 (/ b c)) (+ (* -1/4 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (/ b c)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* c (+ (* -4 a) (/ (pow b 2) c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))) (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* 1/2 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* c (+ (* -1/2 (sqrt (* -4 (/ a c)))) (* 1/2 (/ b c)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 b) (* 1/4 (/ (pow b 2) (* c (sqrt (* -4 (/ a c))))))) c)) (* -1/2 (sqrt (* -4 (/ a c)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (sqrt (* -4 (/ a c))))) (* 1/16 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* -1/2 b)) c)) (* -1/2 (sqrt (* -4 (/ a c)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c))))))) c)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (+ b (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c))) c)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (pow b 2) c)) (* 4 a))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a c))) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c))))))) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ a c))))))) c)) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 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)))))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b)))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) a))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))) (neg.f64 a))
(/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a)
(*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
(fma.f64 #s(literal -1/2 binary64) b (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
(fma.f64 b #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 b #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) b) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
#s(literal -1/2 binary64)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) (-.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
(/.f64 (fma.f64 (*.f64 b b) b (pow.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (*.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))))
(+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))
(pow.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) a) c)))
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3 binary64))) (fma.f64 (*.f64 b b) (*.f64 b b) (-.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)))))
(fma.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(fma.f64 (fabs.f64 b) (fabs.f64 b) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(fma.f64 (neg.f64 b) (neg.f64 b) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(-.f64 (*.f64 b b) (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) a)) c))
(+.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b)))
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))
(+.f64 (/.f64 c (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b)) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b)))
(*.f64 #s(literal 2 binary64) c)
(/.f64 (-.f64 (*.f64 c c) (*.f64 c c)) (-.f64 c c))
(/.f64 (fma.f64 (*.f64 c c) c (*.f64 (*.f64 c c) c)) (fma.f64 c c (-.f64 (*.f64 c c) (*.f64 c c))))
(+.f64 c c)
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c)))) (*.f64 b b)) (+.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (fma.f64 b b (*.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
(-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) 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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(*.f64 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (*.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) #s(literal -1/2 binary64)) a)
(/.f64 (neg.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)) (neg.f64 a))
(/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a)
(+.f64 (/.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) a) (/.f64 b a))
(/.f64 (-.f64 (*.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))) (*.f64 b b)) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(pow.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(+.f64 (/.f64 c (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)) (/.f64 c (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))) (*.f64 b b)) (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (+.f64 a a)) (/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal 2 binary64)) a)
(/.f64 (neg.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (neg.f64 (+.f64 a a)))
(/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (+.f64 a a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(*.f64 #s(literal -1 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(*.f64 a (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (/.f64 c a)))
(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)))
(*.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)
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 c (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (+.f64 c c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(/.f64 (-.f64 (*.f64 c c) (*.f64 c c)) (-.f64 c c))
(/.f64 (fma.f64 (*.f64 c c) c (*.f64 (*.f64 c c) c)) (fma.f64 c c (-.f64 (*.f64 c c) (*.f64 c c))))
(+.f64 c c)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))))
(fma.f64 #s(literal -1 binary64) b (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(*.f64 #s(literal -1 binary64) b)
(neg.f64 b)
(pow.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
#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 (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (neg.f64 a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (neg.f64 a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (neg.f64 a))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (neg.f64 a)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
(/.f64 (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) a)
(/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (neg.f64 a))
(neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
(*.f64 c (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))
(/.f64 (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (neg.f64 a))
(/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)
(*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (/.f64 a c)))
(pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))
(*.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 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(+.f64 (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 b b)) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(pow.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c) (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b)))))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(-.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (neg.f64 b) b))
(+.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64))
(/.f64 (*.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) #s(literal -1/2 binary64)) a)
(/.f64 (neg.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)) (neg.f64 a))
(/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a)
(+.f64 (/.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) a) (/.f64 b a))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 b b)) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
#s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(/.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#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 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c)))) b))))
#s(approx (if (>= b 0) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (if (>=.f64 b #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) b))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b)))) a))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))) a))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 c (sqrt.f64 (*.f64 b b)))))) a))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 c (sqrt.f64 (*.f64 b b)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (sqrt.f64 (*.f64 b b))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a c)) (sqrt.f64 (*.f64 b b))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (sqrt.f64 (*.f64 b b)))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a c)) (sqrt.f64 (*.f64 b b)))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) (*.f64 b b))
#s(approx (+ (* b b) (* (* -4 a) c)) (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b)))
#s(approx (* (* -4 a) c) (*.f64 #s(literal -4 binary64) (*.f64 a c)))
#s(approx (* -4 a) (*.f64 #s(literal -4 binary64) a))
#s(approx a a)
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (*.f64 b b)) b)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 c c))) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 c c)) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 c c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 a (*.f64 #s(literal -2 binary64) (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (*.f64 c (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (*.f64 (sqrt.f64 (*.f64 b b)) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 c c) c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (-.f64 (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a c)) (sqrt.f64 (*.f64 b b)))) b))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))) b))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (-.f64 (sqrt.f64 (*.f64 b b)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a c)) (sqrt.f64 (*.f64 b b))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a c)) (sqrt.f64 (*.f64 b b))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 a (fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (neg (* a (sqrt (* -4 (/ c a))))) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (* a (sqrt (* -4 (/ c a)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (sqrt (* -4 (/ c a))) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a))
#s(approx (* -4 (/ c a)) (*.f64 #s(literal -4 binary64) (/.f64 c a)))
#s(approx (/ c a) (/.f64 c a))
#s(approx (* 2 a) (+.f64 a a))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (neg.f64 a)))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (sqrt (* -4 (/ a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
#s(approx (* -4 (/ a c)) (*.f64 #s(literal -4 binary64) (/.f64 a c)))
#s(approx (/ a c) (/.f64 a c))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal -1/2 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 a (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) (*.f64 a (fma.f64 #s(literal -4 binary64) c (/.f64 (*.f64 b b) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 (+.f64 c c) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))) a))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))) a))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 2 binary64)))) (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 (*.f64 a a) a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))) a))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (neg.f64 b) a))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 a (-.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (/.f64 b a))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 a (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) (/.f64 b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (-.f64 (/.f64 (neg.f64 b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 a (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 a (-.f64 (/.f64 (*.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (neg.f64 (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (sqrt (* -4 (/ a c))) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) (/.f64 #s(literal -2 binary64) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/2 binary64) b)) a)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)) (*.f64 #s(literal -1/2 binary64) b)) a)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (*.f64 a (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (*.f64 a (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) b (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (*.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))) a)) (*.f64 #s(literal 1/2 binary64) b)) a)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (neg.f64 b) a)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (-.f64 b (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (+.f64 b (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a))) a))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))))
#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 (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 #s(literal -2 binary64) (/.f64 c (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 b (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) a))) a)) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 2 binary64)))) (*.f64 b (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) #s(literal -1/2 binary64)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a))) a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) a)) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) b) a))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)) b) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (neg.f64 (/.f64 (-.f64 (neg.f64 b) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (neg.f64 (/.f64 (+.f64 (neg.f64 b) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))) a))) a))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (-.f64 (/.f64 b a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c 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/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) b) a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a)) b) a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#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 (* c (sqrt (* -4 (/ a c)))) (neg.f64 (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))))
#s(approx (sqrt (* -4 (/ a c))) (neg.f64 (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) (/.f64 #s(literal 2 binary64) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) a)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (*.f64 a (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/4 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1/2 binary64)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) #s(literal 1/2 binary64)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 5/2 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 (+.f64 c c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (*.f64 b (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 #s(literal 0 binary64) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 2 binary64)))) (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (neg.f64 b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) #s(literal 1 binary64)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (/.f64 #s(literal 1 binary64) a)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) (/.f64 #s(literal 1 binary64) a)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (*.f64 a (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/4 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (/.f64 #s(literal 1/2 binary64) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (neg.f64 b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 b b)) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (/.f64 (+.f64 c c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (*.f64 b (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 #s(literal 0 binary64) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 2 binary64)))) (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (neg.f64 b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))) #s(literal 1 binary64)))))
#s(approx (neg b) (neg.f64 b))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 b b)) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 5/2 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/.f64 (neg.f64 b) a))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 b (-.f64 (/.f64 c (*.f64 b b)) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 b (-.f64 (+.f64 (/.f64 c (*.f64 b b)) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (+.f64 (/.f64 c (*.f64 b b)) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b)))))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 b (-.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 1 binary64))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 b (-.f64 (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) #s(literal 1 binary64))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))) #s(literal 1 binary64))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b b))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 b (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 c (*.f64 b b)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 b (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 b (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 c (*.f64 b b)))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 a (/.f64 c (*.f64 b b)))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (neg.f64 (*.f64 a (*.f64 c (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 a a) c)) (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b)))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (*.f64 a c) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))))) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b b) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (fma.f64 #s(literal -2 binary64) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b)))) (/.f64 #s(literal 2 binary64) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (fma.f64 #s(literal -2 binary64) (*.f64 a (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b)))) (/.f64 #s(literal 2 binary64) 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 b (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 c (*.f64 b b)))) #s(literal 2 binary64))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 b (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 c (*.f64 b b))))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 b (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.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 (neg.f64 b) (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c))))) a)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (neg.f64 b)))))
#s(approx (if (>= b 0) (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) (neg.f64 b)) a)) (/.f64 (+.f64 c c) (+.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) (neg.f64 b)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (/.f64 c b)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (/.f64 (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))) b)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (/.f64 (+.f64 c (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (/.f64 (+.f64 c (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 a (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (/.f64 (*.f64 a c) b)))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (/.f64 (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))) b)))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) b)))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (*.f64 a c) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))))) b)))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 c (*.f64 b b))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (neg.f64 (/.f64 (+.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) (*.f64 c c))) #s(literal -5/2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 b (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 c (*.f64 b b))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 b (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 b (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (fma.f64 a (/.f64 c (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 c c) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64))) (*.f64 a (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))))))) b)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b 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))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))))) b)))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (/.f64 c (sqrt.f64 (*.f64 b b)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (*.f64 c (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (*.f64 a (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (*.f64 c (fma.f64 c (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 a (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b)))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 c (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 c (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 a a) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 a (sqrt.f64 (*.f64 b b)))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))
#s(approx c c)
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 c (fma.f64 c (fma.f64 #s(literal -2 binary64) (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))) (/.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (*.f64 c (fma.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 a (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 c (*.f64 #s(literal -2 binary64) (fma.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (*.f64 a (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))) (*.f64 (sqrt.f64 (*.f64 b b)) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))))) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))
#s(approx (+ c c) (+.f64 c c))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) b))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a a)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 c (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 b b)))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 c (-.f64 (*.f64 c (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 b b)))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 c (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 c (fma.f64 c (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 a a) a) (/.f64 c (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (neg.f64 (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (sqrt (* -4 (/ a c))) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) c))
#s(approx (/ -2 (sqrt (* -4 (/ a c)))) (*.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) a))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 c (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 b (*.f64 a c)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 b (*.f64 a c)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 a (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal -1/2 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 c (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b c) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b c) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (+ (* b b) (* (* -4 a) c)) (*.f64 c (fma.f64 #s(literal -4 binary64) a (/.f64 (*.f64 b b) c))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (fma.f64 #s(literal 2 binary64) (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (+.f64 (+.f64 (neg.f64 (/.f64 (neg.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 c c))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 (+.f64 b b) (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (-.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 b (/.f64 (neg.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (/.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 2 binary64)))) (*.f64 (*.f64 c c) c))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (fma.f64 #s(literal -2 binary64) (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (neg.f64 b) c))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 c (-.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 b c))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (*.f64 c (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) (/.f64 b c))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 c (-.f64 (/.f64 (neg.f64 b) c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 c (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 c (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c))))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 c (-.f64 (/.f64 (*.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) a))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (*.f64 #s(literal 1/2 binary64) (/.f64 b (*.f64 a c)))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (*.f64 a (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) c)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (/ (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) a) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 a (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))))) c)) (*.f64 #s(literal 1/2 binary64) (/.f64 b a))) c)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 #s(literal 1/2 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (*.f64 c (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal 1/2 binary64) (/.f64 b c))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) b (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))
#s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) c)) (*.f64 #s(literal 1/2 binary64) b)) c)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (neg.f64 b) c)))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (-.f64 b (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c))))))
#s(approx (+ b (sqrt (+ (* b b) (* (* -4 a) c)))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (+.f64 b (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) c))) c))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (sqrt (+ (* b b) (* (* -4 a) c))) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))))
#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 c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (-.f64 (/.f64 (+.f64 b b) (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (-.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 b (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) c)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) b) (*.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 2 binary64))))) (/.f64 (*.f64 b (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) c)) (/.f64 (+.f64 b b) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) b) c))))))
#s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) c)) b) c))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (*.f64 c (+.f64 (/.f64 (neg.f64 b) (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (*.f64 c (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 b a)) c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (*.f64 c (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) (/.f64 b a)) c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (-.f64 (/.f64 b c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a 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/2 binary64) (*.f64 b b)) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) b) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) b) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#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)))))

eval101.0ms (2.2%)

Memory
27.6MiB live, 246.5MiB allocated; 73ms collecting garbage
Compiler

Compiled 10 813 to 3 304 computations (69.4% saved)

prune53.0ms (1.1%)

Memory
-15.9MiB live, 131.3MiB allocated; 32ms collecting garbage
Pruning

21 alts after pruning (19 fresh and 2 done)

PrunedKeptTotal
New43811449
Fresh7815
Picked325
Done000
Total44821469
Accuracy
99.8%
Counts
469 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
69.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) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) #s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(literal 2 binary64))))))
37.0%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)))))
70.7%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))))
30.9%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a))) (*.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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)))))
26.6%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) 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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)))))
31.1%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
38.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
51.9%
#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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) #s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c))))))))
45.9%
#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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) #s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
69.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)) (/.f64 #s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 b (-.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 1 binary64)))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
48.4%
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
52.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)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) #s(approx (sqrt (* -4 (/ a c))) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
41.9%
#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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
58.0%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b b) a)) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
38.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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
37.9%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
57.7%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
32.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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
43.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)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
52.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 (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
31.9%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
Compiler

Compiled 1 971 to 1 627 computations (17.5% saved)

series113.0ms (2.4%)

Memory
-7.1MiB live, 238.4MiB allocated; 66ms collecting garbage
Counts
69 → 320
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))
(neg.f64 b)
(exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))
(log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(*.f64 b b)
#s(literal 1/2 binary64)
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))
(*.f64 #s(literal -4 binary64) (/.f64 c a))
(/.f64 c a)
#s(literal -1/2 binary64)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(+.f64 c c)
(-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))
(/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)
(sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
(neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))
(*.f64 #s(literal -4 binary64) (/.f64 a c))
(/.f64 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 (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a)))
(neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))
(/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a)
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
(*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
(*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))
(sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))
(/.f64 #s(literal -4 binary64) (*.f64 a c))
(*.f64 a c)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
Outputs
#s(approx (if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (- (sqrt (+ (* -4 (* a c)) (pow b 2))) b))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (log (pow b 2)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -2 (/ (* a c) (pow b 2))) (* 1/2 (log (pow b 2))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* a (+ (* -4 (/ (* a (pow c 2)) (pow b 4))) (* -2 (/ c (pow b 2))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* a (+ (* -2 (/ c (pow b 2))) (* a (+ (* -32/3 (/ (* a (pow c 3)) (pow b 6))) (* -4 (/ (pow c 2) (pow b 4))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (log (pow b 2))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* -4 (/ (* a c) (pow b 2))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* a (+ (* -8 (/ (* a (pow c 2)) (pow b 4))) (* -4 (/ c (pow b 2))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* a (+ (* -4 (/ c (pow b 2))) (* a (+ (* -64/3 (/ (* a (pow c 3)) (pow b 6))) (* -8 (/ (pow c 2) (pow b 4))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (pow b 2)))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) 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 (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (sqrt (pow b 2))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))) a)))
#s(approx (neg (sqrt (* -4 (/ c a)))) #s(hole binary64 (* -1 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* -4 (/ c a))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) a)))
#s(approx (* -4 (/ c a)) #s(hole binary64 (* -4 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) #s(hole binary64 (* -1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* (* -4 a) c)) #s(hole binary64 (sqrt (* -4 (* a c)))))
#s(approx (* (* -4 a) c) #s(hole binary64 (* -4 (* a c))))
#s(approx (neg (* c (sqrt (* -4 (/ a c))))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (sqrt (* -4 (/ a c)))))
#s(approx (* -4 (/ a c)) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (/ (* c (sqrt (* -4 (/ a c)))) a)))
#s(approx (sqrt (/ -4 (* a c))) #s(hole binary64 (/ (sqrt (* -4 (/ a c))) a)))
#s(approx (/ -4 (* a c)) #s(hole binary64 (/ -4 (* a c))))
#s(approx (* a c) #s(hole binary64 (* a c)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a)))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (+ (* -1/384 (/ (pow b 6) (* (pow a 3) (pow c 3)))) (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (* -1 (log (/ 1 a))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (+ (* -1 (log (/ 1 a))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (+ (* -1 (log (/ 1 a))) (+ (* -1/4 (/ (pow b 2) (* a c))) (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (+ (* -1 (log (/ 1 a))) (+ (* -1/4 (/ (pow b 2) (* a c))) (+ (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* -1/192 (/ (pow b 6) (* (pow a 3) (pow c 3))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* a (+ (* -4 c) (/ (pow b 2) a)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (sqrt (* -4 (/ c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (neg (sqrt (* -4 (/ c a)))) #s(hole binary64 (* -1 (sqrt (* -4 (/ c a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (neg (* c (sqrt (* -4 (/ a c))))) #s(hole binary64 (* -1 (* a (* c (sqrt (/ -4 (* a c))))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* a (* c (sqrt (/ -4 (* a c)))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* a (sqrt (/ -4 (* a c))))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (* c (sqrt (/ -4 (* a c))))))
#s(approx (sqrt (/ -4 (* a c))) #s(hole binary64 (sqrt (/ -4 (* a c)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (/ (pow b 4) (* a (pow c 2)))) (* 1/8 (/ (pow b 2) c))) a)) (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (/ (pow b 4) (pow c 2))) (* -1/384 (/ (pow b 6) (* a (pow c 3))))) a)) (* 1/8 (/ (pow b 2) c))) a)) (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (+ (* -1 (log (/ -1 a))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (+ (* -1 (log (/ -1 a))) (* -1 (/ (+ (* 1/32 (/ (pow b 4) (* a (pow c 2)))) (* 1/4 (/ (pow b 2) c))) a))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (+ (* -1 (log (/ -1 a))) (* -1 (/ (+ (* -1 (/ (+ (* -1/32 (/ (pow b 4) (pow c 2))) (* -1/192 (/ (pow b 6) (* a (pow c 3))))) a)) (* 1/4 (/ (pow b 2) c))) a))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (pow b 2) a)) (* 4 c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* -1 (/ (+ (* -1/2 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a))) a)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* -1 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (* -4 (* a c))) a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (* -4 (* a c)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/4 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* -1 b) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (* -4 (* a c))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (* a c))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 5))) (* 1/8 (/ 1 (pow (sqrt (* -4 (* a c))) 3))))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (log (* -4 (* a c))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (log (* -4 (* a c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -4 (* a c)))) (* (pow b 2) (- (* -1/64 (/ (pow b 2) (* (pow a 2) (pow c 2)))) (* 1/8 (/ 1 (* a c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -4 (* a c)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/384 (/ (pow b 2) (* (pow a 3) (pow c 3)))) (* 1/64 (/ 1 (* (pow a 2) (pow c 2)))))) (* 1/8 (/ 1 (* a c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (log (* -4 (* a c)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 (* a c))) (* -1/4 (/ (pow b 2) (* a c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 (* a c))) (* (pow b 2) (- (* -1/32 (/ (pow b 2) (* (pow a 2) (pow c 2)))) (* 1/4 (/ 1 (* a c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 (* a c))) (* (pow b 2) (- (* (pow b 2) (- (* -1/192 (/ (pow b 2) (* (pow a 3) (pow c 3)))) (* 1/32 (/ 1 (* (pow a 2) (pow c 2)))))) (* 1/4 (/ 1 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* 2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* 2 (/ (* b c) (pow (sqrt (* -4 (* a c))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3)))))) (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 4))) (/ c (pow (sqrt (* -4 (* a c))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3))))))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* -1 b))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* 1/2 (/ b (sqrt (* -4 (* a c))))) 1)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (/ b a) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* 1/2 (/ b (* a (sqrt (* -4 (* a c)))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* b (+ (* -1/8 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/2 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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 (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #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 (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* -1 (log (/ 1 b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ 1 b))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ 1 b)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -32/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ 1 b))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -2 (log (/ 1 b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ 1 b))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ 1 b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -64/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ 1 b))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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 (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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 (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #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 (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* -1 (log (/ -1 b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ -1 b))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ -1 b)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -32/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ -1 b))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -2 (log (/ -1 b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ -1 b))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ -1 b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -64/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ -1 b))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (if (>= b 0) (/ (- (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ c b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 4))) (* -2 (/ a (pow b 2))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* c (+ (* -2 (/ a (pow b 2))) (* c (+ (* -32/3 (/ (* (pow a 3) c) (pow b 6))) (* -4 (/ (pow a 2) (pow b 4))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* c (+ (* -8 (/ (* (pow a 2) c) (pow b 4))) (* -4 (/ a (pow b 2))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* c (+ (* -4 (/ a (pow b 2))) (* c (+ (* -64/3 (/ (* (pow a 3) c) (pow b 6))) (* -8 (/ (pow a 2) (pow b 4))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -2 (/ c (sqrt (pow b 2)))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* -2 (/ (* a c) (pow (sqrt (pow b 2)) 3))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ a (pow (sqrt (pow b 2)) 3))))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) c)))
#s(approx (sqrt (/ -4 (* a c))) #s(hole binary64 (/ (sqrt (* -4 (/ c a))) c)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c)))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (+ (* -1/384 (/ (pow b 6) (* (pow a 3) (pow c 3)))) (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (* -1 (log (/ 1 c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (+ (* -1 (log (/ 1 c))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (+ (* -1 (log (/ 1 c))) (+ (* -1/4 (/ (pow b 2) (* a c))) (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (+ (* -1 (log (/ 1 c))) (+ (* -1/4 (/ (pow b 2) (* a c))) (+ (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* -1/192 (/ (pow b 6) (* (pow a 3) (pow c 3))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* c (+ (* -4 a) (/ (pow b 2) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))) (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (/ (pow b 4) (* (pow a 2) c))) (* 1/8 (/ (pow b 2) a))) c)) (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (/ (pow b 4) (pow a 2))) (* -1/384 (/ (pow b 6) (* (pow a 3) c)))) c)) (* 1/8 (/ (pow b 2) a))) c)) (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (+ (* -1 (log (/ -1 c))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (+ (* -1 (log (/ -1 c))) (* -1 (/ (+ (* 1/32 (/ (pow b 4) (* (pow a 2) c))) (* 1/4 (/ (pow b 2) a))) c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (+ (* -1 (log (/ -1 c))) (* -1 (/ (+ (* -1 (/ (+ (* -1/32 (/ (pow b 4) (pow a 2))) (* -1/192 (/ (pow b 6) (* (pow a 3) c)))) c)) (* 1/4 (/ (pow b 2) a))) c))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (pow b 2) c)) (* 4 a))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a c))) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c))))))) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ a c))))))) c)) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
Calls

9 calls:

TimeVariablePointExpression
35.0ms
a
@-inf
((if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (>= b 0) b 0 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) 1/2 (* 2 a) 2 (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b 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)) (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) (/ (sqrt (* (* -4 a) c)) a) (sqrt (* (* -4 a) c)) (* (* -4 a) c) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* c (sqrt (* -4 (/ a c))))) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (* a (* c (sqrt (/ -4 (* a c))))) (* c (sqrt (/ -4 (* a c)))) (sqrt (/ -4 (* a c))) (/ -4 (* a c)) (* a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))))
18.0ms
c
@-inf
((if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (>= b 0) b 0 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) 1/2 (* 2 a) 2 (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b 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)) (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) (/ (sqrt (* (* -4 a) c)) a) (sqrt (* (* -4 a) c)) (* (* -4 a) c) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* c (sqrt (* -4 (/ a c))))) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (* a (* c (sqrt (/ -4 (* a c))))) (* c (sqrt (/ -4 (* a c)))) (sqrt (/ -4 (* a c))) (/ -4 (* a c)) (* a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))))
10.0ms
c
@inf
((if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (>= b 0) b 0 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) 1/2 (* 2 a) 2 (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b 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)) (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) (/ (sqrt (* (* -4 a) c)) a) (sqrt (* (* -4 a) c)) (* (* -4 a) c) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* c (sqrt (* -4 (/ a c))))) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (* a (* c (sqrt (/ -4 (* a c))))) (* c (sqrt (/ -4 (* a c)))) (sqrt (/ -4 (* a c))) (/ -4 (* a c)) (* a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))))
9.0ms
a
@inf
((if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (>= b 0) b 0 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) 1/2 (* 2 a) 2 (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b 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)) (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) (/ (sqrt (* (* -4 a) c)) a) (sqrt (* (* -4 a) c)) (* (* -4 a) c) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* c (sqrt (* -4 (/ a c))))) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (* a (* c (sqrt (/ -4 (* a c))))) (* c (sqrt (/ -4 (* a c)))) (sqrt (/ -4 (* a c))) (/ -4 (* a c)) (* a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))))
8.0ms
b
@-inf
((if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (>= b 0) b 0 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b b)) (* -4 a) -4 a c (* b b) 1/2 (* 2 a) 2 (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (sqrt (* -4 (/ c a)))) (sqrt (* -4 (/ c a))) (* -4 (/ c a)) (/ c a) -1/2 (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))) (+ (* (* -4 a) c) (* b 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)) (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) (/ (sqrt (* (* -4 a) c)) a) (sqrt (* (* -4 a) c)) (* (* -4 a) c) (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt (- (* b b) (* (* 4 a) c))) (- (* 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)) (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg (* c (sqrt (* -4 (/ a c))))) (* c (sqrt (* -4 (/ a c)))) (sqrt (* -4 (/ a c))) (* -4 (/ a c)) (/ 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)))))) (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (/ (* c (sqrt (* -4 (/ a c)))) a) (* c (sqrt (* -4 (/ a c)))) (* a (* c (sqrt (/ -4 (* a c))))) (* c (sqrt (/ -4 (* a c)))) (sqrt (/ -4 (* a c))) (/ -4 (* a c)) (* a c) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (sqrt (+ (* (* -4 a) c) (* b b))))

rewrite256.0ms (5.5%)

Memory
30.0MiB live, 270.2MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0177815118
0185813871
0854113562
Stop Event
iter-limit
node-limit
iter-limit
Counts
389 → 446
Calls
Call 1
Inputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))
(neg.f64 b)
(exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))
(log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(*.f64 b b)
#s(literal 1/2 binary64)
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) c)
(+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))
(*.f64 #s(literal -4 binary64) (/.f64 c a))
(/.f64 c a)
#s(literal -1/2 binary64)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(+.f64 c c)
(-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))
(/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)
(sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
(neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))
(*.f64 #s(literal -4 binary64) (/.f64 a c))
(/.f64 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 (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a)))
(neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))
(/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a)
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
(*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
(*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))
(sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))
(/.f64 #s(literal -4 binary64) (*.f64 a c))
(*.f64 a c)
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
#s(approx (if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (+ b (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (- (sqrt (+ (* -4 (* a c)) (pow b 2))) b))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (+ b (sqrt (pow b 2))) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (/ (* a c) (sqrt (pow b 2)))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (/ c (sqrt (pow b 2))) (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (/ (+ (* -1/2 (+ b (sqrt (pow b 2)))) (* a (+ (* a (+ (* 2 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))) (/ c (sqrt (pow b 2)))))) a)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* 2 (/ (* a c) (sqrt (pow b 2)))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* a (- (* 2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* a (- (* a (- (* 4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ c (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (sqrt (pow b 2))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (log (pow b 2)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -2 (/ (* a c) (pow b 2))) (* 1/2 (log (pow b 2))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* a (+ (* -4 (/ (* a (pow c 2)) (pow b 4))) (* -2 (/ c (pow b 2))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* a (+ (* -2 (/ c (pow b 2))) (* a (+ (* -32/3 (/ (* a (pow c 3)) (pow b 6))) (* -4 (/ (pow c 2) (pow b 4))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (log (pow b 2))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* -4 (/ (* a c) (pow b 2))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* a (+ (* -8 (/ (* a (pow c 2)) (pow b 4))) (* -4 (/ c (pow b 2))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* a (+ (* -4 (/ c (pow b 2))) (* a (+ (* -64/3 (/ (* a (pow c 3)) (pow b 6))) (* -8 (/ (pow c 2) (pow b 4))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (pow b 2)))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (+ (* -4 (* a c)) (pow b 2))))
#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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* 2 (/ c (- (sqrt (pow b 2)) b)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* 4 (/ (* a (pow c 2)) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (- (sqrt (pow b 2)) b))) (* a (+ (* 4 (/ (pow c 2) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* a (+ (* -2 (* a (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow c 4) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* c (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow c 3) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (sqrt (pow b 2)) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3)))))))) 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 (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (sqrt (pow b 2))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* -2 (/ (* a c) (sqrt (pow b 2)))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* -2 (/ (* a (pow c 2)) (pow (sqrt (pow b 2)) 3))))))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (/ (+ b (+ (sqrt (pow b 2)) (* a (+ (* -2 (/ c (sqrt (pow b 2)))) (* a (+ (* -4 (/ (* a (pow c 3)) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow c 2) (pow (sqrt (pow b 2)) 3))))))))) a)))
#s(approx (neg (sqrt (* -4 (/ c a)))) #s(hole binary64 (* -1 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* -4 (/ c a))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) a)))
#s(approx (* -4 (/ c a)) #s(hole binary64 (* -4 (/ c a))))
#s(approx (/ c a) #s(hole binary64 (/ c a)))
#s(approx (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) #s(hole binary64 (* -1/2 (/ (sqrt (* -4 (* a c))) a))))
#s(approx (sqrt (* (* -4 a) c)) #s(hole binary64 (sqrt (* -4 (* a c)))))
#s(approx (* (* -4 a) c) #s(hole binary64 (* -4 (* a c))))
#s(approx (neg (* c (sqrt (* -4 (/ a c))))) #s(hole binary64 (* -1 (* c (sqrt (* -4 (/ a c)))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* c (sqrt (* -4 (/ a c))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (sqrt (* -4 (/ a c)))))
#s(approx (* -4 (/ a c)) #s(hole binary64 (* -4 (/ a c))))
#s(approx (/ a c) #s(hole binary64 (/ a c)))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (/ (* c (sqrt (* -4 (/ a c)))) a)))
#s(approx (sqrt (/ -4 (* a c))) #s(hole binary64 (/ (sqrt (* -4 (/ a c))) a)))
#s(approx (/ -4 (* a c)) #s(hole binary64 (/ -4 (* a c))))
#s(approx (* a c) #s(hole binary64 (* a c)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (* -1/2 (/ b a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (sqrt (* -4 (/ c a)))) (+ (* -1/2 (/ b a)) (+ (* -1/4 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (* 1/16 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (* -1 (/ b a)) (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (* -1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (* 1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (sqrt (* -4 (/ c a))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a)))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (+ (* -1/384 (/ (pow b 6) (* (pow a 3) (pow c 3)))) (* 1/2 (+ (log (* -4 c)) (* -1 (log (/ 1 a))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (* -1 (log (/ 1 a))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (+ (* -1 (log (/ 1 a))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (+ (* -1 (log (/ 1 a))) (+ (* -1/4 (/ (pow b 2) (* a c))) (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 c)) (+ (* -1 (log (/ 1 a))) (+ (* -1/4 (/ (pow b 2) (* a c))) (+ (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* -1/192 (/ (pow b 6) (* (pow a 3) (pow c 3))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* a (+ (* -4 c) (/ (pow b 2) a)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* 2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ (+ (* -2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) (pow a 2))) (+ (* -2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) (pow a 3))) (+ (* 2 (/ c (sqrt (* -4 (/ c a))))) (* 2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2))))))) a)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ b a))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))) (/ b a)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* a (- (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (sqrt (* -4 (/ c a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))) (/ b a))))))
#s(approx (neg (sqrt (* -4 (/ c a)))) #s(hole binary64 (* -1 (sqrt (* -4 (/ c a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* a (- (/ (pow b 2) a) (* 4 c)))))
#s(approx (neg (* c (sqrt (* -4 (/ a c))))) #s(hole binary64 (* -1 (* a (* c (sqrt (/ -4 (* a c))))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) #s(hole binary64 (* a (* c (sqrt (/ -4 (* a c)))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* a (sqrt (/ -4 (* a c))))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) #s(hole binary64 (* -1 (* c (sqrt (/ -4 (* a c)))))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) #s(hole binary64 (* c (sqrt (/ -4 (* a c))))))
#s(approx (sqrt (/ -4 (* a c))) #s(hole binary64 (sqrt (/ -4 (* a c)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* 1/2 (sqrt (* -4 (/ c a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/4 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) (* 1/2 b)) a)) (* 1/2 (sqrt (* -4 (/ c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (- (/ b a) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)) (sqrt (* -4 (/ c a))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a))))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (+ (* -1/8 (/ (pow b 4) (* (pow a 4) (pow (sqrt (* -4 (/ c a))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow a 6) (pow (sqrt (* -4 (/ c a))) 5)))) (* 1/2 (/ (pow b 2) (* (pow a 2) (sqrt (* -4 (/ c a)))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (/ (pow b 4) (* a (pow c 2)))) (* 1/8 (/ (pow b 2) c))) a)) (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (/ (pow b 4) (pow c 2))) (* -1/384 (/ (pow b 6) (* a (pow c 3))))) a)) (* 1/8 (/ (pow b 2) c))) a)) (* 1/2 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (* -1 (log (/ -1 a))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (+ (* -1 (log (/ -1 a))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (+ (* -1 (log (/ -1 a))) (* -1 (/ (+ (* 1/32 (/ (pow b 4) (* a (pow c 2)))) (* 1/4 (/ (pow b 2) c))) a))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 c)) (+ (* -1 (log (/ -1 a))) (* -1 (/ (+ (* -1 (/ (+ (* -1/32 (/ (pow b 4) (pow c 2))) (* -1/192 (/ (pow b 6) (* a (pow c 3))))) a)) (* 1/4 (/ (pow b 2) c))) a))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* a (+ (* -1 (/ (pow b 2) a)) (* 4 c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -2 (/ c (* a (sqrt (* -4 (/ c a))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (* b c) (* a (pow (sqrt (* -4 (/ c a))) 2)))) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3)))) a))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (* 2 (/ (+ (* 1/2 (/ (* (pow b 3) c) (pow (sqrt (* -4 (/ c a))) 4))) (/ (* b (+ (* -1 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))) (* 1/2 (/ (* (pow b 2) c) (pow (sqrt (* -4 (/ c a))) 3))))) (sqrt (* -4 (/ c a))))) a))) a)) (* 2 (/ (* b c) (pow (sqrt (* -4 (/ c a))) 2)))) a)) (* 2 (/ c (sqrt (* -4 (/ c a)))))) a))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (/ b a))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a)))))) b) a)))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* a (+ (sqrt (* -4 (/ c a))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ c a)))))) a)) b) a)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ c a))))))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -1 (sqrt (* -4 (/ c a)))) (* -1 (/ (+ (* -1 b) (* -1 (/ (+ (* -1/2 (/ (pow b 2) (sqrt (* -4 (/ c a))))) (* 1/8 (/ (pow b 4) (* (pow a 2) (pow (sqrt (* -4 (/ c a))) 3))))) a))) a)))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* a (- (* -1 (/ (pow b 2) a)) (* -4 c))))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (* -1 (* a (sqrt (/ -4 (* a c)))))))
#s(approx (>= b 0) #s(hole bool (>= b 0)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (* -4 (* a c))) a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (* -4 (* a c)))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (* -4 (* a c))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/4 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* -1 b) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (* -4 (* a c))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)) (sqrt (* -4 (* a c))))))
#s(approx (neg b) #s(hole binary64 (* -1 b)))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (* a c))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 5))) (* 1/8 (/ 1 (pow (sqrt (* -4 (* a c))) 3))))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (log (* -4 (* a c))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (log (* -4 (* a c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -4 (* a c)))) (* (pow b 2) (- (* -1/64 (/ (pow b 2) (* (pow a 2) (pow c 2)))) (* 1/8 (/ 1 (* a c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -4 (* a c)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/384 (/ (pow b 2) (* (pow a 3) (pow c 3)))) (* 1/64 (/ 1 (* (pow a 2) (pow c 2)))))) (* 1/8 (/ 1 (* a c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (log (* -4 (* a c)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 (* a c))) (* -1/4 (/ (pow b 2) (* a c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 (* a c))) (* (pow b 2) (- (* -1/32 (/ (pow b 2) (* (pow a 2) (pow c 2)))) (* 1/4 (/ 1 (* a c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 (* a c))) (* (pow b 2) (- (* (pow b 2) (- (* -1/192 (/ (pow b 2) (* (pow a 3) (pow c 3)))) (* 1/32 (/ 1 (* (pow a 2) (pow c 2)))))) (* 1/4 (/ 1 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* 2 (/ c (sqrt (* -4 (* a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* 2 (/ (* b c) (pow (sqrt (* -4 (* a c))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3)))))) (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ c (sqrt (* -4 (* a c))))) (* b (+ (* 2 (/ c (pow (sqrt (* -4 (* a c))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 4))) (/ c (pow (sqrt (* -4 (* a c))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ c (pow (sqrt (* -4 (* a c))) 3))))))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* -1 b))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* 1/2 (/ b (sqrt (* -4 (* a c))))) 1)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (+ (sqrt (* -4 (* a c))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (* -4 (* a c))) 3))) (* 1/2 (/ 1 (sqrt (* -4 (* a c))))))) 1)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (/ b a) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* 1/2 (/ b (* a (sqrt (* -4 (* a c)))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* b (+ (* b (+ (* -1/8 (/ (pow b 2) (* a (pow (sqrt (* -4 (* a c))) 3)))) (* 1/2 (/ 1 (* a (sqrt (* -4 (* a c)))))))) (/ 1 a))) (/ (sqrt (* -4 (* a c))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ b a)) (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* -1/4 (/ b (* a (sqrt (neg (* 4 (* a c))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (sqrt (neg (* 4 (* a c)))) a)) (* b (- (* b (- (* 1/16 (/ (pow b 2) (* a (pow (sqrt (neg (* 4 (* a c)))) 3)))) (* 1/4 (/ 1 (* a (sqrt (neg (* 4 (* a c))))))))) (* 1/2 (/ 1 a)))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (* 2 (/ c (sqrt (neg (* 4 (* a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* 2 (/ (* b c) (pow (sqrt (neg (* 4 (* a c)))) 2))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3)))))) (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) #s(hole binary64 (+ (* 2 (/ c (sqrt (neg (* 4 (* a c)))))) (* b (+ (* 2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 2))) (* b (+ (* -2 (* b (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))) (/ c (pow (sqrt (neg (* 4 (* a c)))) 4))))) (* -2 (+ (* -1 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ c (pow (sqrt (neg (* 4 (* a c)))) 3))))))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (sqrt (neg (* 4 (* a c))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* -1 b))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* 1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* b (- (* b (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* 1/2 (/ (pow b 2) (sqrt (neg (* 4 (* a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* -1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) #s(hole binary64 (+ (sqrt (neg (* 4 (* a c)))) (* (pow b 2) (+ (* (pow b 2) (- (* 1/16 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 5))) (* 1/8 (/ 1 (pow (sqrt (neg (* 4 (* a c)))) 3))))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (- (pow b 2) (* 4 (* a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (* -1 (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* -1 b) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* -1/2 (/ b (sqrt (neg (* 4 (* a c)))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) #s(hole binary64 (- (* b (- (* b (- (* 1/8 (/ (pow b 2) (pow (sqrt (neg (* 4 (* a c)))) 3))) (* 1/2 (/ 1 (sqrt (neg (* 4 (* a c)))))))) 1)) (sqrt (neg (* 4 (* a c)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (/ b a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* b (- (/ c (pow b 2)) (/ 1 a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* b (- (+ (/ c (pow b 2)) (/ (* a (pow c 2)) (pow b 4))) (/ 1 a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -2 b)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* b (- (* 2 (/ (* a c) (pow b 2))) 2))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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 (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* b (+ 1 (* -2 (/ (* a c) (pow b 2)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #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 (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* -1 (log (/ 1 b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ 1 b))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ 1 b)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -32/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ 1 b))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -2 (log (/ 1 b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ 1 b))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ 1 b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -64/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ 1 b))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* (pow b 2) (+ 1 (* -4 (/ (* a c) (pow b 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -2 (/ (* a c) b))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (/ (+ (* -2 (* a c)) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 2)))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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 (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* b (+ (* -2 (/ c (pow b 2))) (* 2 (/ 1 a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) #s(hole binary64 (if (>= b 0) (* 1/2 (/ (- (* -1 b) (sqrt (+ (* -4 (* a c)) (pow b 2)))) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (/ c b))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (/ (+ c (/ (* a (pow c 2)) (pow b 2))) b))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (/ (- (* 2 (/ (* (pow a 2) (pow c 2)) (pow b 2))) (* -2 (* a c))) b))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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 (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* b (+ 1 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* b (+ 1 (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #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 (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* -1 (log (/ -1 b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ -1 b))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ -1 b)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -32/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -4 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -2 (/ (* a c) (pow b 2))) (* -1 (log (/ -1 b))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (* -2 (log (/ -1 b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ -1 b))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ -1 b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (* -64/3 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -8 (/ (* (pow a 2) (pow c 2)) (pow b 4))) (+ (* -4 (/ (* a c) (pow b 2))) (* -2 (log (/ -1 b))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* b (+ 2 (* -2 (/ (* a c) (pow b 2))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #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) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* b (+ 2 (+ (* -4 (/ (* (pow a 3) (pow c 3)) (pow b 6))) (+ (* -2 (/ (* a c) (pow b 2))) (* -2 (/ (* (pow a 2) (pow c 2)) (pow b 4))))))))))
#s(approx (if (>= b 0) (/ (- (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 (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) #s(hole binary64 (if (>= b 0) (* -1/2 (/ (- (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)) a)) (* 2 (/ c (+ (sqrt (+ (* -4 (* a c)) (pow b 2))) (* -1 b)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* 2 (/ c b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (/ (+ (* -2 c) (* -2 (/ (* a (pow c 2)) (pow b 2)))) b))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) 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 (+ (* (* -4 a) c) (* b b))) 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 (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (/ c (sqrt (pow b 2))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (/ 1 (sqrt (pow b 2))) (/ (* a c) (pow (sqrt (pow b 2)) 3)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (+ (* -1/2 (/ (+ b (sqrt (pow b 2))) a)) (* c (+ (* c (+ (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (/ a (pow (sqrt (pow b 2)) 3)))) (/ 1 (sqrt (pow b 2))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* c (- (* 2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (* c (- (* c (- (* 4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))) (* -2 (/ a (sqrt (pow b 2)))))) (+ b (sqrt (pow b 2))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* c (+ (* -4 (/ (* (pow a 2) c) (pow b 4))) (* -2 (/ a (pow b 2))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow b 2))) (* c (+ (* -2 (/ a (pow b 2))) (* c (+ (* -32/3 (/ (* (pow a 3) c) (pow b 6))) (* -4 (/ (pow a 2) (pow b 4))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* c (+ (* -8 (/ (* (pow a 2) c) (pow b 4))) (* -4 (/ a (pow b 2))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (pow b 2)) (* c (+ (* -4 (/ a (pow b 2))) (* c (+ (* -64/3 (/ (* (pow a 3) c) (pow b 6))) (* -8 (/ (pow a 2) (pow b 4))))))))))
#s(approx c #s(hole binary64 c))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* c (+ (* 4 (/ (* a c) (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* c (+ (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2))))))) (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (* c (+ (* c (+ (* 4 (/ a (* (sqrt (pow b 2)) (pow (- (sqrt (pow b 2)) b) 2)))) (* c (+ (* -2 (* c (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 4) (pow (- (sqrt (pow b 2)) b) 3)))) (+ (* -4 (/ (pow a 3) (* (pow (sqrt (pow b 2)) 5) (pow (- (sqrt (pow b 2)) b) 2)))) (* 2 (/ (* a (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))) (* (sqrt (pow b 2)) (- (sqrt (pow b 2)) b)))))))) (* -2 (+ (* -4 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 2) (pow (- (sqrt (pow b 2)) b) 3)))) (* -2 (/ (pow a 2) (* (pow (sqrt (pow b 2)) 3) (pow (- (sqrt (pow b 2)) b) 2)))))))))) (* 2 (/ 1 (- (sqrt (pow b 2)) b)))))))
#s(approx (* 2 c) #s(hole binary64 (* 2 c)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* -2 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 3)))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (- (+ (sqrt (pow b 2)) (* c (+ (* -2 (/ a (sqrt (pow b 2)))) (* c (+ (* -4 (/ (* (pow a 3) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ (pow a 2) (pow (sqrt (pow b 2)) 3)))))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* -2 (/ c (sqrt (pow b 2)))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* -2 (/ (* a c) (pow (sqrt (pow b 2)) 3))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (+ (* c (- (* c (+ (* -4 (/ (* (pow a 2) c) (pow (sqrt (pow b 2)) 5))) (* -2 (/ a (pow (sqrt (pow b 2)) 3))))) (* 2 (/ 1 (sqrt (pow b 2)))))) (+ (/ b a) (/ (sqrt (pow b 2)) a)))))
#s(approx (sqrt (* -4 (/ a c))) #s(hole binary64 (/ (sqrt (* -4 (* a c))) c)))
#s(approx (sqrt (/ -4 (* a c))) #s(hole binary64 (/ (sqrt (* -4 (/ c a))) c)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (* -1/2 (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* c (+ (* -1/2 (/ b (* a c))) (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (+ (* -1/4 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (* -1 (/ b c)) (sqrt (* -4 (/ a c)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (* -1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (* 1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (sqrt (* -4 (/ a c))) (+ (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))) (/ b c)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c)))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (+ (* -1/64 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (+ (* -1/384 (/ (pow b 6) (* (pow a 3) (pow c 3)))) (* 1/2 (+ (log (* -4 a)) (* -1 (log (/ 1 c))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (* -1 (log (/ 1 c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (+ (* -1 (log (/ 1 c))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (+ (* -1 (log (/ 1 c))) (+ (* -1/4 (/ (pow b 2) (* a c))) (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* -4 a)) (+ (* -1 (log (/ 1 c))) (+ (* -1/4 (/ (pow b 2) (* a c))) (+ (* -1/32 (/ (pow b 4) (* (pow a 2) (pow c 2)))) (* -1/192 (/ (pow b 6) (* (pow a 3) (pow c 3))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* c (+ (* -4 a) (/ (pow b 2) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ 2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (+ (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (pow c 2))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (+ (* -1 (/ (+ (/ (* b (+ (* -2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3)))) (sqrt (* -4 (/ a c)))) (/ (pow b 3) (pow (sqrt (* -4 (/ a c))) 4))) (pow c 3))) (* 2 (/ 1 (sqrt (* -4 (/ a c)))))) (+ (* -2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (+ (* -2 (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (/ (pow b 2) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ b c))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))) (/ b c)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* c (- (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))) (/ b c)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* c (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3))))) (+ (* 1/2 (/ (pow b 2) (* a (* (pow c 2) (sqrt (* -4 (/ a c))))))) (+ (/ b (* a c)) (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* c (- (/ (pow b 2) c) (* 4 a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* 1/2 (/ (* c (sqrt (* -4 (/ a c)))) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1/2 (/ (sqrt (* -4 (/ a c))) a)) (* 1/2 (/ b (* a c))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ b a)) (* 1/4 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c)))))))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow b 2) (* a (sqrt (* -4 (/ a c)))))) (* 1/16 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))))) c)) (* -1/2 (/ b a))) c)) (* -1/2 (/ (sqrt (* -4 (/ a c))) a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (- (/ b c) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* 1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)) (sqrt (* -4 (/ a c))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c))))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (+ (* -1/8 (/ (pow b 4) (* (pow c 4) (pow (sqrt (* -4 (/ a c))) 3)))) (+ (* 1/16 (/ (pow b 6) (* (pow c 6) (pow (sqrt (* -4 (/ a c))) 5)))) (* 1/2 (/ (pow b 2) (* (pow c 2) (sqrt (* -4 (/ a c)))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1/8 (/ (pow b 2) (* a c))) (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* 1/64 (/ (pow b 4) (* (pow a 2) c))) (* 1/8 (/ (pow b 2) a))) c)) (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (/ (pow b 4) (pow a 2))) (* -1/384 (/ (pow b 6) (* (pow a 3) c)))) c)) (* 1/8 (/ (pow b 2) a))) c)) (* 1/2 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (* -1 (log (/ -1 c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (+ (* -1 (log (/ -1 c))) (* -1/4 (/ (pow b 2) (* a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (+ (* -1 (log (/ -1 c))) (* -1 (/ (+ (* 1/32 (/ (pow b 4) (* (pow a 2) c))) (* 1/4 (/ (pow b 2) a))) c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) #s(hole binary64 (+ (log (* 4 a)) (+ (* -1 (log (/ -1 c))) (* -1 (/ (+ (* -1 (/ (+ (* -1/32 (/ (pow b 4) (pow a 2))) (* -1/192 (/ (pow b 6) (* (pow a 3) c)))) c)) (* 1/4 (/ (pow b 2) a))) c))))))
#s(approx (+ (* (* -4 a) c) (* b b)) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (pow b 2) c)) (* 4 a))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (/ -2 (sqrt (* -4 (/ a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (* 2 (/ b (* c (pow (sqrt (* -4 (/ a c))) 2)))) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (* -1 (/ (- (+ (* -1 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3)))) (* 2 (/ (pow b 2) (* c (pow (sqrt (* -4 (/ a c))) 3))))) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) #s(hole binary64 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow b 3) (* c (pow (sqrt (* -4 (/ a c))) 4)))) (/ (* b (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* c (sqrt (* -4 (/ a c)))))) (+ (* -1 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))) (* 2 (/ (pow b 2) (pow (sqrt (* -4 (/ a c))) 3))))) c)) (* 2 (/ b (pow (sqrt (* -4 (/ a c))) 2)))) c)) (* 2 (/ 1 (sqrt (* -4 (/ a c))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (/ b c))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1/2 (/ (pow b 2) (* c (sqrt (* -4 (/ a c)))))) b) c)))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) #s(hole binary64 (* -1 (* c (+ (sqrt (* -4 (/ a c))) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3)))) (* 1/2 (/ (pow b 2) (sqrt (* -4 (/ a c)))))) c)) b) c)))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ b (* a c))) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1/2 (/ (pow b 2) (* a (* c (sqrt (* -4 (/ a c))))))) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) #s(hole binary64 (* -1 (* c (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (pow b 4) (* a (* (pow c 2) (pow (sqrt (* -4 (/ a c))) 3))))) (* 1/2 (/ (pow b 2) (* a (sqrt (* -4 (/ a c))))))) c)) (/ b a)) c)) (/ (sqrt (* -4 (/ a c))) a))))))
#s(approx (- (* b b) (* (* 4 a) c)) #s(hole binary64 (* -1 (* c (- (* -1 (/ (pow b 2) c)) (* -4 a))))))
Outputs
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))))
(>=.f64 b #s(literal 0 binary64))
b
#s(literal 0 binary64)
(/.f64 (neg.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a))
(-.f64 (/.f64 (neg.f64 b) (*.f64 #s(literal 2 binary64) a)) (/.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (*.f64 #s(literal 2 binary64) a)))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))))
(-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))
(neg.f64 b)
(pow.f64 (exp.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))
(log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 3 binary64)) (pow.f64 (*.f64 b b) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (*.f64 #s(literal -4 binary64) a) c) (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b)))))
(fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))
(-.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 (neg.f64 b) b))
(+.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) (*.f64 b b))
(*.f64 #s(literal -4 binary64) a)
#s(literal -4 binary64)
a
c
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64)))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))
(*.f64 #s(literal 2 binary64) c)
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))))
(+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
(neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (/.f64 c a)))
(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)))
(*.f64 #s(literal -4 binary64) (/.f64 c a))
(/.f64 (neg.f64 c) (neg.f64 a))
(/.f64 c a)
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(+.f64 (/.f64 c (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)) (/.f64 c (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)))
(/.f64 (-.f64 (*.f64 c c) (*.f64 c c)) (-.f64 c c))
(/.f64 (fma.f64 (*.f64 c c) c (*.f64 (*.f64 c c) c)) (fma.f64 c c (-.f64 (*.f64 c c) (*.f64 c c))))
(+.f64 c c)
(/.f64 (-.f64 (*.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))) (*.f64 b b)) (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b)
(pow.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b)))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))) (neg.f64 a))
(/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a)
(*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) a)) (sqrt.f64 c))
(pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c))
(*.f64 (*.f64 #s(literal -4 binary64) a) c)
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) c)) (neg.f64 (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (-.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))) (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 b) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))))))
(+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))
(pow.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(/.f64 (neg.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (*.f64 #s(literal 2 binary64) a))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(*.f64 (neg.f64 c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(*.f64 c (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
(*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (/.f64 a c)))
(pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))
(*.f64 #s(literal -4 binary64) (/.f64 a c))
(/.f64 (neg.f64 a) (neg.f64 c))
(/.f64 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 (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) (neg.f64 a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) (neg.f64 a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) (neg.f64 a))) #s(literal -1/2 binary64))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) (neg.f64 a)))
(/.f64 (neg.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))) a)
(/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) (neg.f64 a))
(neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))
(/.f64 (neg.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))) (neg.f64 a))
(/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a)
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
(*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
(*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))
(pow.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 a c)))
(sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))
(/.f64 #s(literal 4 binary64) (neg.f64 (*.f64 a c)))
(/.f64 #s(literal -4 binary64) (*.f64 a c))
(*.f64 a c)
(/.f64 (neg.f64 (+.f64 c c)) (neg.f64 (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(+.f64 (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 b b)) (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
(-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b)
(pow.f64 (exp.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))
#s(approx (if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b)))) a)) (*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) b)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b)))) a))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))) a))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 c (sqrt.f64 (*.f64 b b)))))) a))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b)))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 a (fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (sqrt.f64 (*.f64 b b)))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (-.f64 (sqrt.f64 (*.f64 b b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log.f64 (sqrt.f64 (*.f64 b b))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (log.f64 (sqrt.f64 (*.f64 b b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (+.f64 (log.f64 (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (+.f64 (log.f64 (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -32/3 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (*.f64 #s(literal 2 binary64) (log.f64 b)))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal 2 binary64) (log.f64 b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal 2 binary64) (log.f64 b) (*.f64 a (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 c (*.f64 b b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal 2 binary64) (log.f64 b) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 c (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -64/3 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 c c) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))
#s(approx (+ (* (* -4 a) c) (* b b)) (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b)))
#s(approx (* -4 a) (*.f64 #s(literal -4 binary64) a))
#s(approx a a)
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 c c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (*.f64 b b)) b)) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 c c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 a (*.f64 #s(literal -2 binary64) (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (*.f64 (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (*.f64 (sqrt.f64 (*.f64 b b)) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 c c) c) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (sqrt.f64 (*.f64 b b)) b))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (-.f64 (sqrt.f64 (*.f64 b b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b))))) b))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))) b))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 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 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c))))) a)) (*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c)))) b)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (-.f64 (sqrt.f64 (*.f64 b b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (sqrt.f64 (*.f64 b b)))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 c c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))))) a))
#s(approx (neg (sqrt (* -4 (/ c a)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (sqrt (* -4 (/ c a))) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a))
#s(approx (* -4 (/ c a)) (*.f64 #s(literal -4 binary64) (/.f64 c a)))
#s(approx (/ c a) (/.f64 c a))
#s(approx (* -1/2 (/ (sqrt (* (* -4 a) c)) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (sqrt (* (* -4 a) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (* (* -4 a) c) (*.f64 #s(literal -4 binary64) (*.f64 a c)))
#s(approx (neg (* c (sqrt (* -4 (/ a c))))) (*.f64 #s(literal -1 binary64) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (sqrt (* -4 (/ a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))
#s(approx (* -4 (/ a c)) (*.f64 #s(literal -4 binary64) (/.f64 a c)))
#s(approx (/ a c) (/.f64 a c))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))
#s(approx (sqrt (/ -4 (* a c))) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))
#s(approx (/ -4 (* a c)) (/.f64 #s(literal -4 binary64) (*.f64 a c)))
#s(approx (* a c) (*.f64 a c))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 a (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 a))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 a))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 a)))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 a)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 a)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) c)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 a)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))) (*.f64 #s(literal -1/192 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 a (fma.f64 #s(literal -4 binary64) c (/.f64 (*.f64 b b) a))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal 2 binary64) (/.f64 c (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))) a))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 2 binary64))) (/.f64 (*.f64 b (*.f64 (/.f64 (*.f64 (*.f64 b b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 (*.f64 a a) a)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))) a))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal 1 binary64) (/.f64 b a)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 a (-.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) (/.f64 b a))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 a (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))) (/.f64 b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 b a)))))
#s(approx (neg (sqrt (* -4 (/ c a)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 a (-.f64 (/.f64 (*.f64 b b) a) (*.f64 #s(literal 4 binary64) c))))
#s(approx (neg (* c (sqrt (* -4 (/ a c))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))))
#s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (sqrt (* -4 (/ a c))) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (neg (/ (* c (sqrt (* -4 (/ a c)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ (* c (sqrt (* -4 (/ a c)))) a) (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (sqrt (/ -4 (* a c))) (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (*.f64 #s(literal 1/2 binary64) b)) a) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a) (*.f64 #s(literal 1/2 binary64) b)) a) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (/.f64 b a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) b) a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a)) b) a)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 a a) a)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 c c))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b b) c))) a) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 c c)) (*.f64 #s(literal -1/384 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 a (*.f64 (*.f64 c c) c))))) a) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b b) c))) a) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) a)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 c c))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) c))) a)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal 4 binary64) c)) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) a)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 c c)) (*.f64 #s(literal -1/192 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 a (*.f64 (*.f64 c c) c))))) a) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) c))) a)))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) a) (*.f64 #s(literal 4 binary64) c)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal -2 binary64) (/.f64 c (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b c) (*.f64 a (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) a))) a) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a)))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 2 binary64))) (/.f64 (*.f64 b (*.f64 (/.f64 (*.f64 (*.f64 b b) c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) a))) a) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) a) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) b) a))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) a)) b) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (fma.f64 #s(literal -1 binary64) b (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 b (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)) #s(literal 3/2 binary64)))))) a))) a))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) a) (*.f64 #s(literal 4 binary64) c)))))
#s(approx (sqrt (* -4 (/ a c))) (*.f64 #s(literal -1 binary64) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (>= b 0) (>=.f64 b #s(literal 0 binary64)))
#s(approx b b)
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (fma.f64 b (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 b b) (*.f64 a (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 #s(literal -1 binary64) b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (neg b) (*.f64 #s(literal -1 binary64) b))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 5/2 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (+.f64 (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 c c))) (*.f64 #s(literal -1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (+.f64 (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/384 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c))) (*.f64 #s(literal -1/64 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 c c))))) (*.f64 #s(literal -1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (log.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 c c))) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/192 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c))) (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 c c))))) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (*.f64 b (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 #s(literal 0 binary64) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 2 binary64)))) (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal 1 binary64) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) #s(literal 1 binary64)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) a))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 b (fma.f64 #s(literal 1/2 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (/.f64 #s(literal 1 binary64) a)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (/.f64 #s(literal 1 binary64) a)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) a)))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (fma.f64 #s(literal -1/4 binary64) (/.f64 b (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) a) (*.f64 b (fma.f64 b (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 b b) (*.f64 a (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (/.f64 (*.f64 b c) (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))))))
#s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (fma.f64 #s(literal 2 binary64) (/.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 b (fma.f64 #s(literal 2 binary64) (/.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) (*.f64 b (*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 #s(literal 0 binary64) (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 2 binary64)))) (*.f64 (/.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) #s(literal -1/2 binary64)))))))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal 1 binary64) b)))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64)))))
#s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) #s(literal 1 binary64)))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (sqrt (- (* b b) (* (* 4 a) c))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 5/2 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
#s(approx (- (* b b) (* (* 4 a) c)) (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 #s(literal -1 binary64) b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 b (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (-.f64 (*.f64 b (-.f64 (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)) #s(literal 3/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) #s(literal 1 binary64))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 b a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 b (-.f64 (/.f64 c (*.f64 b b)) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 b (-.f64 (+.f64 (/.f64 c (*.f64 b b)) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 b (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (+.f64 (/.f64 c (*.f64 b b)) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -2 binary64) b))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 b (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (*.f64 b b))) #s(literal 2 binary64))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 b (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 b (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (*.f64 b b))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -32/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 b))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 b))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal -64/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 b)))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a c) (*.f64 b b))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a (*.f64 c (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 a a) c)) (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 c c)) #s(literal -1/2 binary64)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 c (*.f64 b b)))) (/.f64 #s(literal 1 binary64) a))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))) b))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (*.f64 a c) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))))))) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal 2 binary64) (/.f64 b a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) a))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) a)))))))
#s(approx (if (>= b 0) (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) b) (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b)))) a)) (*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) (*.f64 #s(literal 1 binary64) b))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 c b)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))) b)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 c (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 c (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 a (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)) (*.f64 #s(literal 2 binary64) (*.f64 a c))) b)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b)))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (fma.f64 a c (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 b b)))))) b)))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -32/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal -64/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a c) (*.f64 b b)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) (*.f64 c c))) #s(literal -5/2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a c) (*.f64 b b)))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.f64 b b)))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 a c) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 c c)) (*.f64 (*.f64 b b) (*.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 (*.f64 #s(literal -1 binary64) b) (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c))))) a)) (*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 #s(literal -4 binary64) (*.f64 a c)))) (*.f64 #s(literal 1 binary64) b))))))
#s(approx (if (>= b 0) (* (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) -1/2) (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) (*.f64 #s(literal -1 binary64) b)) a)) (*.f64 #s(literal 2 binary64) (/.f64 c (-.f64 (sqrt.f64 (fma.f64 #s(literal -4 binary64) (*.f64 a c) (*.f64 b b))) (*.f64 #s(literal 1 binary64) b))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal 2 binary64) (/.f64 c b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (+.f64 c (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b))))) b)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 c c) c)) (*.f64 (*.f64 b b) (*.f64 b b))) (fma.f64 #s(literal -2 binary64) c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 c c)) (*.f64 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (*.f64 a c) #s(literal 4 binary64)) #s(literal 20 binary64)) (*.f64 a (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)))))))) b)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (/.f64 c (sqrt.f64 (*.f64 b b)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (*.f64 c (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 a c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a) (*.f64 c (fma.f64 c (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) c) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (/.f64 a (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 c (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (*.f64 c (fma.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) c) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b)))))) (+.f64 b (sqrt.f64 (*.f64 b b)))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 (*.f64 a a) c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) c) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (+.f64 (log.f64 (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) c) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (/.f64 a (*.f64 b b)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (+.f64 (log.f64 (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -32/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) c) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal 2 binary64) (log.f64 b) (*.f64 c (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) c) (*.f64 (*.f64 b b) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 a (*.f64 b b)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (fma.f64 #s(literal 2 binary64) (log.f64 b) (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 a (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -64/3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) c) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 b b))))))))))
#s(approx c c)
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a c) (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 c (fma.f64 c (fma.f64 #s(literal -2 binary64) (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (*.f64 #s(literal 4 binary64) (/.f64 a (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 c (fma.f64 c (fma.f64 #s(literal 4 binary64) (/.f64 a (*.f64 (sqrt.f64 (*.f64 b b)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 c (*.f64 #s(literal -2 binary64) (fma.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 5/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))) (*.f64 (sqrt.f64 (*.f64 b b)) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 (*.f64 b b)) (sqrt.f64 (*.f64 b b))) (pow.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 (pow.f64 (*.f64 b b) #s(literal 3/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (*.f64 b b)) b) (-.f64 (sqrt.f64 (*.f64 b b)) b)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (*.f64 b b)) b))))))
#s(approx (* 2 c) (*.f64 #s(literal 2 binary64) c))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 a (sqrt.f64 (*.f64 b b))) (/.f64 (*.f64 (*.f64 a a) c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))) b))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (-.f64 (+.f64 (sqrt.f64 (*.f64 b b)) (*.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 a (sqrt.f64 (*.f64 b b))) (*.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) a) c) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))))))) b))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 #s(literal -2 binary64) (/.f64 c (sqrt.f64 (*.f64 b b))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 c (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a c) (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (fma.f64 c (fma.f64 c (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) c) (pow.f64 (*.f64 b b) #s(literal 5/2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 a (pow.f64 (*.f64 b b) #s(literal 3/2 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 b b))))) (/.f64 (+.f64 b (sqrt.f64 (*.f64 b b))) a)))
#s(approx (sqrt (* -4 (/ a c))) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))) c))
#s(approx (sqrt (/ -4 (* a c))) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) c))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 c (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 b (*.f64 a c)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 b (*.f64 a c)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))))))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 c (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 c (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 c (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (/.f64 b c))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 c))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 c))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c))) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 c)))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (-.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 c)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 c)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 c)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal -4 binary64) a)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 c)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 c c))) (*.f64 #s(literal -1/192 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 c c) c)))))))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 c (fma.f64 #s(literal -4 binary64) a (/.f64 (*.f64 b b) c))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 c c)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal -2 binary64) (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 b (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) (/.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 2 binary64)))) (*.f64 (*.f64 c c) c)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (fma.f64 #s(literal -2 binary64) (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal 1 binary64) (/.f64 b c)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 c (-.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) (/.f64 b c))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 c (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))) (/.f64 b c))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 c (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (+.f64 (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 c (-.f64 (/.f64 (*.f64 b b) c) (*.f64 #s(literal 4 binary64) a))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a)))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a) (*.f64 #s(literal 1/2 binary64) (/.f64 b (*.f64 a c)))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 b a) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))) c) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (/ (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (* 2 a)) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))))) c) (*.f64 #s(literal -1/2 binary64) (/.f64 b a))) c) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 c (-.f64 (/.f64 b c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 c (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) b) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (- (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 c (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) b) c)) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))))))
#s(approx (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (*.f64 c c) (*.f64 c c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 (*.f64 c c) c) (*.f64 (*.f64 c c) c)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 c c) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) c))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b b) (*.f64 a c)) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) c)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b b) a))) c) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) c)))))))
#s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a a)) (*.f64 #s(literal -1/384 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 a a) a) c)))) c) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b b) a))) c) (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) c)))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (-.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) c)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) c)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 b b) (*.f64 a c))))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) c)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) c)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) a))) c)))))
#s(approx (log (+ (* (* -4 a) c) (* b b))) (+.f64 (log.f64 (*.f64 #s(literal 4 binary64) a)) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) c)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a a)) (*.f64 #s(literal -1/192 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 b b) b)) (*.f64 (*.f64 (*.f64 a a) a) c)))) c) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 b b) a))) c)))))
#s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) c) (*.f64 #s(literal 4 binary64) a)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 b (*.f64 c (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 b b) (*.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 b (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) c) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (/ (* 2 c) (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) b) (*.f64 c (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 2 binary64)))) (/.f64 (*.f64 b (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 (/.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) c) (*.f64 #s(literal -2 binary64) (/.f64 b (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) c) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c)))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) b) c))))))
#s(approx (+ (neg b) (exp (* (log (+ (* (* -4 a) c) (* b b))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 c (-.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) c)) b) c))))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 b (*.f64 a c)) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (/.f64 b a)) c) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 a (*.f64 (*.f64 c c) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))))))) c) (/.f64 b a)) c) (/.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) a)))))
#s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -1 binary64) (*.f64 c (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 b b) c) (*.f64 #s(literal 4 binary64) a)))))

eval98.0ms (2.1%)

Memory
-14.1MiB live, 117.1MiB allocated; 17ms collecting garbage
Compiler

Compiled 13 279 to 3 323 computations (75% saved)

prune46.0ms (1%)

Memory
-4.5MiB live, 93.8MiB allocated; 17ms collecting garbage
Pruning

22 alts after pruning (17 fresh and 5 done)

PrunedKeptTotal
New4524456
Fresh11314
Picked235
Done022
Total45522477
Accuracy
99.8%
Counts
477 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
69.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) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) #s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(literal 2 binary64))))))
32.3%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b))))))))
40.2%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
30.9%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a))) (*.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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a)))))
26.6%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) 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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)))))
31.1%
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
33.9%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) a)) (sqrt.f64 c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
27.1%
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) 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 a c))))))
51.9%
#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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) #s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b c))))))))
45.9%
#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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) #s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
69.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)) (/.f64 #s(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 b (-.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 1 binary64)))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
48.4%
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))))
52.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)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) #s(approx (sqrt (* -4 (/ a c))) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
41.9%
#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 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
58.0%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b b) a)) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
38.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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
37.9%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
57.7%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
32.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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
43.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)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
52.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 (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b))))
31.9%
#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 (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
Compiler

Compiled 1 998 to 1 275 computations (36.2% saved)

regimes59.0ms (1.3%)

Memory
25.8MiB live, 114.5MiB allocated; 8ms collecting garbage
Counts
49 → 3
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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b b) a)) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b 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 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) 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 a c))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 (+.f64 c c) (sqrt.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal -4 binary64) a) c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) a)) (sqrt.f64 c)) a))) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) 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 (/.f64 (+.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 (*.f64 #s(literal -4 binary64) a) 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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -4 binary64) (*.f64 c a))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 #s(literal -4 binary64) (*.f64 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)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 a (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) c)) (*.f64 b b))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (neg.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 #s(approx (- (* b b) (* (* 4 a) 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) 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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c)))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) #s(approx (sqrt (- (* b b) (* (* 4 a) c))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) a))) (*.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))) (*.f64 (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 binary64))) 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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 #s(approx (* c (sqrt (* -4 (/ a c)))) (*.f64 a (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c)))))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (/.f64 (*.f64 c (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c)))) a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 c (*.f64 b b)) (/.f64 #s(literal 2 binary64) a)))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b 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(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (+.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a)))) (/.f64 b a))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b 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 (/.f64 #s(approx (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) (+.f64 b b)) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b 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(approx (* -1/2 (+ b (sqrt (+ (* b b) (* (* -4 a) c))))) (*.f64 b (-.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal 1 binary64)))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) 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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) #s(approx (sqrt (* -4 (/ a c))) (*.f64 a (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) #s(approx (/ (+ c c) (- (sqrt (+ (* (* -4 a) c) (* b b))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b 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 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) #s(approx (/ (+ c c) (- (sqrt (+ (* b b) (* (* -4 a) c))) b)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 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 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))) b))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 c a) #s(literal -4 binary64) (*.f64 b 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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #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)) #s(approx (/ (* 2 c) (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c))))) (/.f64 #s(literal 2 binary64) (sqrt.f64 (*.f64 (/.f64 a c) #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 (neg.f64 b) #s(approx (+ (* (* a (/ c (* b b))) -2) 2) #s(literal 2 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) #s(approx (/ (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)) (*.f64 #s(approx (/ (* (sqrt (* (/ a c) -4)) c) a) (*.f64 c (sqrt.f64 (/.f64 #s(literal -4 binary64) (*.f64 a c))))) #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 (/.f64 c (*.f64 b b)) (/.f64 #s(literal 1 binary64) a)) b)) (/.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 (*.f64 (sqrt.f64 (*.f64 (/.f64 a c) #s(literal -4 binary64))) c) 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)) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 c a) #s(literal -4 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)) (/.f64 #s(approx (- (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 #s(literal -2 binary64) 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))))))
(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))))))
#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 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) #s(approx (- (sqrt (+ (* (* -4 a) c) (* b b))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.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 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) #s(approx (- (sqrt (+ (* b b) (* (* -4 a) c))) b) (neg.f64 (*.f64 c (+.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 a c))) (/.f64 b 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)))) (neg.f64 (*.f64 (+.f64 (/.f64 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) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) (fma.f64 (*.f64 a (/.f64 c (*.f64 b b))) #s(literal -2 binary64) #s(literal 2 binary64))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b)))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 b))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c))))))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 #s(approx (* (log (+ (* (* -4 a) c) (* b b))) 1/2) (log.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (*.f64 a c)))))))))
(if (>=.f64 b #s(literal 0 binary64)) (/.f64 (-.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 2 binary64) a)) (/.f64 (*.f64 #s(literal 2 binary64) c) (+.f64 (neg.f64 b) (exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 1/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 (/.f64 (+.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) b) a) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (/.f64 (-.f64 (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64)) (*.f64 (*.f64 b b) b)) (fma.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (fma.f64 b b (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) 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 (fma.f64 (*.f64 (*.f64 b b) b) #s(literal -1 binary64) (pow.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 b b (-.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b))) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))) (*.f64 (neg.f64 b) (sqrt.f64 (fma.f64 (*.f64 #s(literal -4 binary64) a) c (*.f64 b b)))))))))
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) #s(approx (+ (neg b) (sqrt (- (* b b) (* (* 4 a) c)))) (*.f64 (neg.f64 b) #s(approx (+ (* (* a (/ c (* b b))) -2) 2) #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 (*.f64 #s(literal -1/2 binary64) (+.f64 b (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) c))))) a) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 (fma.f64 b b (*.f64 (*.f64 #s(literal -4 binary64) a) 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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (/.f64 (+.f64 b b) a)) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
Calls

4 calls:

17.0ms
b
14.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))))))
12.0ms
a
12.0ms
c
Results
AccuracySegmentsBranch
89.1%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))))))
78.7%3a
89.5%3b
76.2%2c
Compiler

Compiled 31 to 29 computations (6.5% saved)

regimes29.0ms (0.6%)

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

2 calls:

18.0ms
b
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))))))
Results
AccuracySegmentsBranch
83.1%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))))))
83.0%2b
Compiler

Compiled 29 to 23 computations (20.7% saved)

regimes9.0ms (0.2%)

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

1 calls:

7.0ms
b
Results
AccuracySegmentsBranch
83.6%3b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes18.0ms (0.4%)

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

2 calls:

10.0ms
b
6.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
74.5%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))))))
78.2%2b
Compiler

Compiled 29 to 23 computations (20.7% saved)

regimes8.0ms (0.2%)

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

1 calls:

6.0ms
b
Results
AccuracySegmentsBranch
78.2%2b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes49.0ms (1.1%)

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

1 calls:

47.0ms
b
Results
AccuracySegmentsBranch
78.2%2b
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes17.0ms (0.4%)

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

3 calls:

5.0ms
b
5.0ms
c
5.0ms
a
Results
AccuracySegmentsBranch
67.1%3c
64.6%3a
75.2%3b
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes7.0ms (0.1%)

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

2 calls:

3.0ms
b
3.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
66.3%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))))))
74.4%3b
Compiler

Compiled 29 to 23 computations (20.7% saved)

regimes6.0ms (0.1%)

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

3 calls:

2.0ms
c
2.0ms
a
2.0ms
b
Results
AccuracySegmentsBranch
59.7%2a
62.0%2c
60.9%2b
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes21.0ms (0.5%)

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

4 calls:

16.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
b
1.0ms
a
Results
AccuracySegmentsBranch
40.0%2a
32.8%1b
40.0%2(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))))))
40.0%2c
Compiler

Compiled 31 to 29 computations (6.5% saved)

regimes4.0ms (0.1%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
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 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b 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)))))) (if (>=.f64 b #s(literal 0 binary64)) (*.f64 #s(approx (/ (+ (sqrt (+ (* (* -4 a) c) (* b b))) b) a) (neg.f64 (sqrt.f64 (*.f64 #s(literal -4 binary64) (/.f64 c a))))) #s(literal -1/2 binary64)) (/.f64 (+.f64 c c) (-.f64 (sqrt.f64 #s(approx (+ (* (* -4 a) c) (* b b)) (*.f64 b b))) b))))
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
b
1.0ms
a
1.0ms
c
Results
AccuracySegmentsBranch
31.9%1b
31.9%1a
31.9%1c
31.9%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))))))
Compiler

Compiled 31 to 29 computations (6.5% saved)

bsearch22.0ms (0.5%)

Memory
-13.8MiB live, 35.9MiB allocated; 7ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
4.0ms
2.4319705831938367e+107
2.781715154485168e+107
15.0ms
-1.2511706033726318e+136
-4.1218670601775007e+135
Samples
9.0ms112×0valid
0.0ms0invalid
Compiler

Compiled 664 to 556 computations (16.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-mult!: 2.0ms (31.3% of total)
ival-if: 1.0ms (15.6% of total)
ival-sub!: 1.0ms (15.6% of total)
ival-sqrt: 1.0ms (15.6% of total)
ival-div!: 1.0ms (15.6% of total)
ival-neg: 1.0ms (15.6% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)
ival->=: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
2.4319705831938367e+107
2.781715154485168e+107
Compiler

Compiled 239 to 186 computations (22.2% saved)

bsearch58.0ms (1.2%)

Memory
15.8MiB live, 60.1MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
2.4319705831938367e+107
2.781715154485168e+107
53.0ms
3.1270847103099857e-302
9.161828042706524e-285
Samples
13.0ms160×0valid
8.0ms97×0invalid
Compiler

Compiled 1 405 to 1 238 computations (11.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-mult!: 5.0ms (36.2% of total)
ival-sqrt: 2.0ms (14.5% of total)
ival-div!: 2.0ms (14.5% of total)
ival-if: 1.0ms (7.2% of total)
ival-sub!: 1.0ms (7.2% of total)
ival-add!: 1.0ms (7.2% of total)
ival->=: 1.0ms (7.2% of total)
ival-neg: 1.0ms (7.2% of total)
adjust: 0.0ms (0% of total)

bsearch22.0ms (0.5%)

Memory
-2.4MiB live, 42.5MiB allocated; 6ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
19.0ms
7.568969383650366e-55
1.5318234182684424e-53
Samples
12.0ms112×0valid
2.0ms19×0invalid
Compiler

Compiled 853 to 754 computations (11.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-mult!: 6.0ms (59.4% of total)
ival-if: 1.0ms (9.9% of total)
ival-sub!: 1.0ms (9.9% of total)
ival-sqrt: 1.0ms (9.9% of total)
ival-div!: 1.0ms (9.9% of total)
ival-neg: 1.0ms (9.9% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)
ival->=: 0.0ms (0% of total)

bsearch13.0ms (0.3%)

Memory
16.2MiB live, 16.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
11.0ms
2.772420842984616e-55
7.568969383650366e-55
Samples
6.0ms80×0valid
1.0ms13×0invalid
Compiler

Compiled 596 to 521 computations (12.6% saved)

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

bsearch2.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
2.772420842984616e-55
7.568969383650366e-55
Compiler

Compiled 611 to 516 computations (15.5% saved)

bsearch38.0ms (0.8%)

Memory
1.2MiB live, 46.2MiB allocated; 7ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
8.0ms
2.772420842984616e-55
7.568969383650366e-55
26.0ms
-8.806140732403307e-42
-5.49680014305939e-45
Samples
22.0ms176×0valid
3.0ms33×0invalid
Compiler

Compiled 1 469 to 1 142 computations (22.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival->=: 8.0ms (41.9% of total)
ival-mult!: 4.0ms (21% of total)
ival-div!: 2.0ms (10.5% of total)
ival-if: 1.0ms (5.2% of total)
ival-sub!: 1.0ms (5.2% of total)
ival-sqrt: 1.0ms (5.2% of total)
ival-neg: 1.0ms (5.2% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch41.0ms (0.9%)

Memory
-3.3MiB live, 52.1MiB allocated; 9ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
2.772420842984616e-55
7.568969383650366e-55
36.0ms
-5.200440392451044e-73
-2.6030071067568508e-83
Samples
13.0ms160×0valid
3.0ms33×0invalid
Compiler

Compiled 1 451 to 1 211 computations (16.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 11.0ms
ival-mult!: 4.0ms (37.4% of total)
ival-div!: 2.0ms (18.7% of total)
ival-if: 1.0ms (9.3% of total)
ival-sub!: 1.0ms (9.3% of total)
ival-sqrt: 1.0ms (9.3% of total)
ival->=: 1.0ms (9.3% of total)
ival-neg: 1.0ms (9.3% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch28.0ms (0.6%)

Memory
-29.7MiB live, 17.7MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
25.0ms
-4.928577421026101e+75
-1.1892630387888052e+75
Samples
20.0ms96×0valid
1.0ms11×0invalid
Compiler

Compiled 689 to 554 computations (19.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-mult!: 2.0ms (33.7% of total)
ival-sqrt: 1.0ms (16.8% of total)
ival-div!: 1.0ms (16.8% of total)
adjust: 0.0ms (0% of total)
ival-if: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)
ival->=: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-7.191300158466074e-178
-6.203440242310304e-178
Compiler

Compiled 31 to 26 computations (16.1% saved)

derivations504.0ms (10.8%)

Memory
11.1MiB live, 451.3MiB allocated; 167ms collecting garbage
Stop Event
fuel
Compiler

Compiled 355 to 206 computations (42% saved)

preprocess122.0ms (2.6%)

Memory
7.4MiB live, 236.6MiB allocated; 46ms collecting garbage
Compiler

Compiled 383 to 226 computations (41% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...