0.546 * [progress]: [Phase 1 of 3] Setting up.
0.005 * * * [progress]: [1/2] Preparing points
0.006 * * * * [points]: Sampling 256 additional inputs, on iter 0 have 0 / 256
0.009 * * * * [points]: Computing exacts on every 16 of 256 points to ramp up precision
0.070 * * * * [points]: Setting MPFR precision to 64
0.072 * * * * [points]: Setting MPFR precision to 320
0.074 * * * * [points]: Computing exacts on every 8 of 256 points to ramp up precision
0.077 * * * * [points]: Setting MPFR precision to 64
0.080 * * * * [points]: Setting MPFR precision to 320
0.083 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.086 * * * * [points]: Setting MPFR precision to 64
0.089 * * * * [points]: Setting MPFR precision to 320
0.093 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.130 * * * * [points]: Setting MPFR precision to 64
0.136 * * * * [points]: Setting MPFR precision to 320
0.142 * * * * [points]: Computing exacts for 256 points
0.145 * * * * [points]: Setting MPFR precision to 64
0.162 * * * * [points]: Setting MPFR precision to 320
0.182 * * * * [points]: Filtering points with unrepresentable outputs
0.183 * * * * [points]: Sampled 256 points with exact outputs
0.184 * * * [progress]: [2/2] Setting up program.
0.202 * [progress]: [Phase 2 of 3] Improving.
0.202 * * * * [progress]: [ 1 / 1 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.204 * [simplify]: Simplifying:
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
0.205 * * [simplify]: iteration 0: 16 enodes
0.211 * * [simplify]: iteration 1: 27 enodes
0.216 * * [simplify]: iteration 2: 35 enodes
0.222 * * [simplify]: iteration 3: 37 enodes
0.227 * * [simplify]: iteration complete: 37 enodes
0.227 * * [simplify]: Extracting #0: cost 1 inf + 0
0.227 * * [simplify]: Extracting #1: cost 5 inf + 0
0.228 * * [simplify]: Extracting #2: cost 9 inf + 1
0.228 * * [simplify]: Extracting #3: cost 10 inf + 2
0.228 * * [simplify]: Extracting #4: cost 9 inf + 407
0.228 * * [simplify]: Extracting #5: cost 13 inf + 728
0.228 * * [simplify]: Extracting #6: cost 12 inf + 1051
0.228 * * [simplify]: Extracting #7: cost 11 inf + 1052
0.228 * * [simplify]: Extracting #8: cost 5 inf + 4107
0.229 * * [simplify]: Extracting #9: cost 1 inf + 9604
0.229 * * [simplify]: Extracting #10: cost 0 inf + 11289
0.230 * [simplify]: Simplified to:
  (/.p16 (-.p16 (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) b) (*.p16 (real->posit16 2) a))
0.269 * * [progress]: iteration 1 / 4
0.270 * * * [progress]: picking best candidate
0.286 * * * * [pick]: Picked  #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.286 * * * [progress]: localizing error
0.477 * * * [progress]: generating rewritten candidates
0.478 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
0.482 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 2)
0.482 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
0.486 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1)
0.503 * * * [progress]: generating series expansions
0.503 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
0.503 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 2)
0.503 * * * * [progress]: [ 3 / 4 ] generating series at (2)
0.504 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1)
0.504 * * * [progress]: simplifying candidates
0.504 * * * * [progress]: [ 1 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 2 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 3 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 4 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 5 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 6 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (real->posit16 0.0)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 7 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 8 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 9 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (neg.p16 b) (-.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 10 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 11 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 12 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (neg.p16 b) (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 13 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 14 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 15 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 16 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 17 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.504 * * * * [progress]: [ 18 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 19 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 20 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 21 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 22 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 23 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 24 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 25 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 26 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 27 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 28 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 29 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 30 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 31 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 32 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 33 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
0.505 * * * * [progress]: [ 34 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) a))>
0.505 * * * * [progress]: [ 35 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 36 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 37 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 38 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 39 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 40 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 41 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.505 * * * * [progress]: [ 42 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
0.505 * * * * [progress]: [ 43 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
0.506 * * * * [progress]: [ 44 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
0.506 * * * * [progress]: [ 45 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))>
0.506 * * * * [progress]: [ 46 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
0.506 * * * * [progress]: [ 47 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))))>
0.506 * * * * [progress]: [ 48 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 49 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 50 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 51 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 52 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 53 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 54 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)))>
0.506 * * * * [progress]: [ 55 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
0.506 * * * * [progress]: [ 56 / 88 ] simplifiying candidate #<alt (λ (a b c) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))))>
0.506 * * * * [progress]: [ 57 / 88 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))))>
0.506 * * * * [progress]: [ 58 / 88 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
0.506 * * * * [progress]: [ 59 / 88 ] simplifiying candidate #<alt (λ (a b c) (-.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
0.506 * * * * [progress]: [ 60 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))))>
0.506 * * * * [progress]: [ 61 / 88 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
0.506 * * * * [progress]: [ 62 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
0.506 * * * * [progress]: [ 63 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (real->posit16 0.0))) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 64 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (*.p16 (real->posit16 4) (real->posit16 0.0))))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 65 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 0.0) (real->posit16 4))) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 66 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))) (*.p16 (real->posit16 0.0) (real->posit16 4))))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 67 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (real->posit16 0.0)) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 68 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 69 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.506 * * * * [progress]: [ 70 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (*.p16 b b) (-.p16 (real->posit16 0.0) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 71 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (real->posit16 0.0) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 72 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 73 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (*.p16 b b) (neg.p16 (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 74 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (*.p16 a c)))) (+.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 75 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 76 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (posit16->quire16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 77 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 1.0))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 78 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 79 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 80 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 81 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 82 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 83 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (*.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (real->posit16 1.0)))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 84 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))) (real->posit16 1.0)))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 85 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 86 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 87 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.507 * * * * [progress]: [ 88 / 88 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
0.508 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (real->posit16 0.0))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (real->posit16 0.0)))
  (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))
  (-.p16 (*.p16 b b) (*.p16 (real->posit16 0.0) (real->posit16 4)))
  (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))
  (-.p16 (*.p16 b b) (real->posit16 0.0))
  (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))
  (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))
  (-.p16 (real->posit16 0.0) (*.p16 (real->posit16 4) (*.p16 a c)))
  (+.p16 (real->posit16 0.0) (*.p16 (real->posit16 4) (*.p16 a c)))
  (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))
  (neg.p16 (*.p16 (real->posit16 4) (*.p16 a c)))
  (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (*.p16 a c))))
  (+.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
0.509 * * [simplify]: iteration 0: 60 enodes
0.521 * * [simplify]: iteration 1: 118 enodes
0.555 * * [simplify]: iteration 2: 543 enodes
0.748 * * [simplify]: iteration 3: 2004 enodes
1.031 * * [simplify]: iteration complete: 2004 enodes
1.031 * * [simplify]: Extracting #0: cost 31 inf + 0
1.032 * * [simplify]: Extracting #1: cost 298 inf + 0
1.033 * * [simplify]: Extracting #2: cost 615 inf + 2099
1.038 * * [simplify]: Extracting #3: cost 725 inf + 51587
1.052 * * [simplify]: Extracting #4: cost 380 inf + 297212
1.089 * * [simplify]: Extracting #5: cost 164 inf + 549661
1.136 * * [simplify]: Extracting #6: cost 3 inf + 789755
1.189 * * [simplify]: Extracting #7: cost 0 inf + 793889
1.266 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))))
  (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (real->posit16 2))
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))))) a)
  (*.p16 (real->posit16 2) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (*.p16 a (*.p16 (real->posit16 2) (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))) b)))
  (*.p16 (real->posit16 2) a)
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (*.p16 b b)
  (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))
  (*.p16 b b)
  (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))
  (*.p16 b b)
  (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))
  (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))
  (*.p16 (real->posit16 4) (-.p16 (real->posit16 0.0) (*.p16 c a)))
  (*.p16 (*.p16 c a) (real->posit16 4))
  (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4)))
  (neg.p16 (*.p16 (*.p16 c a) (real->posit16 4)))
  (*.p16 (+.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))) (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))
  (+.p16 (*.p16 (*.p16 c a) (real->posit16 4)) (*.p16 b b))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (*.p16 c a) (real->posit16 4)) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 c a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 c a) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
1.278 * * * [progress]: adding candidates to table
6.068 * * [progress]: iteration 2 / 4
6.068 * * * [progress]: picking best candidate
6.277 * * * * [pick]: Picked  #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
6.277 * * * [progress]: localizing error
7.055 * * * [progress]: generating rewritten candidates
7.055 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 2 1 1)
7.055 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1)
7.060 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 2)
7.060 * * * * [progress]: [ 4 / 4 ] rewriting at (2)
7.069 * * * [progress]: generating series expansions
7.069 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 2 1 1)
7.070 * * * * [progress]: [ 2 / 4 ] generating series at (2 1)
7.070 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 2)
7.070 * * * * [progress]: [ 4 / 4 ] generating series at (2)
7.070 * * * [progress]: simplifying candidates
7.070 * * * * [progress]: [ 1 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 2 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 3 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 4 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 5 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 6 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (real->posit16 0.0)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 7 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 8 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 9 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (neg.p16 b) (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 10 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 11 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 12 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (neg.p16 b) (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.070 * * * * [progress]: [ 13 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 14 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 15 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 16 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 17 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 18 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 19 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 20 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 21 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 22 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 23 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 24 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 25 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 26 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 27 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 28 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.071 * * * * [progress]: [ 29 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
7.072 * * * * [progress]: [ 30 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
7.072 * * * * [progress]: [ 31 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
7.072 * * * * [progress]: [ 32 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
7.072 * * * * [progress]: [ 33 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
7.072 * * * * [progress]: [ 34 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) a))>
7.072 * * * * [progress]: [ 35 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 36 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 37 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 38 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 39 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 40 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 41 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.072 * * * * [progress]: [ 42 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
7.072 * * * * [progress]: [ 43 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
7.072 * * * * [progress]: [ 44 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
7.072 * * * * [progress]: [ 45 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))>
7.073 * * * * [progress]: [ 46 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
7.073 * * * * [progress]: [ 47 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))))>
7.073 * * * * [progress]: [ 48 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 49 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 50 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 51 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 52 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 53 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 54 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
7.073 * * * * [progress]: [ 55 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
7.073 * * * * [progress]: [ 56 / 66 ] simplifiying candidate #<alt (λ (a b c) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))))>
7.073 * * * * [progress]: [ 57 / 66 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))))>
7.073 * * * * [progress]: [ 58 / 66 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
7.073 * * * * [progress]: [ 59 / 66 ] simplifiying candidate #<alt (λ (a b c) (-.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
7.073 * * * * [progress]: [ 60 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))))>
7.073 * * * * [progress]: [ 61 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
7.074 * * * * [progress]: [ 62 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
7.074 * * * * [progress]: [ 63 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
7.074 * * * * [progress]: [ 64 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
7.074 * * * * [progress]: [ 65 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
7.074 * * * * [progress]: [ 66 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))>
7.075 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (real->posit16 0.0))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
7.077 * * [simplify]: iteration 0: 43 enodes
7.093 * * [simplify]: iteration 1: 71 enodes
7.131 * * [simplify]: iteration 2: 303 enodes
7.698 * * [simplify]: iteration 3: 1964 enodes
8.439 * * [simplify]: iteration 4: 2053 enodes
8.874 * * [simplify]: iteration complete: 2053 enodes
8.874 * * [simplify]: Extracting #0: cost 22 inf + 0
8.874 * * [simplify]: Extracting #1: cost 211 inf + 0
8.876 * * [simplify]: Extracting #2: cost 381 inf + 209
8.884 * * [simplify]: Extracting #3: cost 357 inf + 27243
8.898 * * [simplify]: Extracting #4: cost 88 inf + 230353
8.945 * * [simplify]: Extracting #5: cost 0 inf + 325568
8.994 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 a (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
  (*.p16 a (*.p16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) b) (real->posit16 2)))
  (*.p16 a (real->posit16 2))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))
9.004 * * * [progress]: adding candidates to table
13.515 * * [progress]: iteration 3 / 4
13.515 * * * [progress]: picking best candidate
13.825 * * * * [pick]: Picked  #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
13.825 * * * [progress]: localizing error
14.130 * * * [progress]: generating rewritten candidates
14.131 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 1 1)
14.131 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1)
14.134 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2)
14.134 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2)
14.138 * * * [progress]: generating series expansions
14.138 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 1 1)
14.138 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1)
14.138 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2)
14.138 * * * * [progress]: [ 4 / 4 ] generating series at (2 2)
14.138 * * * [progress]: simplifying candidates
14.138 * * * * [progress]: [ 1 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.138 * * * * [progress]: [ 2 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.138 * * * * [progress]: [ 3 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.138 * * * * [progress]: [ 4 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.138 * * * * [progress]: [ 5 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 6 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (-.p16 (neg.p16 b) (real->posit16 0.0)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
14.139 * * * * [progress]: [ 7 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) a)))>
14.139 * * * * [progress]: [ 8 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 9 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (neg.p16 b) (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 10 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 11 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) a)))>
14.139 * * * * [progress]: [ 12 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (neg.p16 b) (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 13 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 14 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 15 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))) a)))>
14.139 * * * * [progress]: [ 16 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) a)))>
14.139 * * * * [progress]: [ 17 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 18 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 19 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) a)))>
14.139 * * * * [progress]: [ 20 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 21 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) a)))>
14.139 * * * * [progress]: [ 22 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) a)))>
14.139 * * * * [progress]: [ 23 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 24 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) a)))>
14.139 * * * * [progress]: [ 25 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) a)))>
14.139 * * * * [progress]: [ 26 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.139 * * * * [progress]: [ 27 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))) a)))>
14.139 * * * * [progress]: [ 28 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.140 * * * * [progress]: [ 29 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) a)))>
14.140 * * * * [progress]: [ 30 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) a)))>
14.140 * * * * [progress]: [ 31 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) a)))>
14.140 * * * * [progress]: [ 32 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) a)))>
14.140 * * * * [progress]: [ 33 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) a)))>
14.140 * * * * [progress]: [ 34 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 35 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 36 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 37 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 38 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 39 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 40 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 41 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (/.p16 a (real->posit16 1.0)))))>
14.140 * * * * [progress]: [ 42 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>
14.140 * * * * [progress]: [ 43 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 1.0)))))>
14.140 * * * * [progress]: [ 44 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))))>
14.140 * * * * [progress]: [ 45 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))))>
14.140 * * * * [progress]: [ 46 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))))>
14.140 * * * * [progress]: [ 47 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (+.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a) (real->posit16 0.0))))>
14.140 * * * * [progress]: [ 48 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (-.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a) (real->posit16 0.0))))>
14.140 * * * * [progress]: [ 49 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))))>
14.140 * * * * [progress]: [ 50 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a) (real->posit16 1.0))))>
14.140 * * * * [progress]: [ 51 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a) (real->posit16 1.0))))>
14.140 * * * * [progress]: [ 52 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
14.141 * * * * [progress]: [ 53 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
14.141 * * * * [progress]: [ 54 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
14.141 * * * * [progress]: [ 55 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))>
14.141 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (real->posit16 0.0))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (real->posit16 1.0))
  (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (*.p16 a (real->posit16 1.0))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
14.142 * * [simplify]: iteration 0: 39 enodes
14.159 * * [simplify]: iteration 1: 59 enodes
14.170 * * [simplify]: iteration 2: 181 enodes
14.344 * * [simplify]: iteration 3: 1060 enodes
14.711 * * [simplify]: iteration 4: 2002 enodes
15.189 * * [simplify]: iteration complete: 2002 enodes
15.189 * * [simplify]: Extracting #0: cost 18 inf + 0
15.190 * * [simplify]: Extracting #1: cost 164 inf + 1
15.192 * * [simplify]: Extracting #2: cost 361 inf + 1700
15.195 * * [simplify]: Extracting #3: cost 683 inf + 31752
15.202 * * [simplify]: Extracting #4: cost 495 inf + 113540
15.211 * * [simplify]: Extracting #5: cost 433 inf + 141681
15.222 * * [simplify]: Extracting #6: cost 417 inf + 150511
15.243 * * [simplify]: Extracting #7: cost 348 inf + 219752
15.282 * * [simplify]: Extracting #8: cost 52 inf + 558432
15.329 * * [simplify]: Extracting #9: cost 1 inf + 620434
15.380 * * [simplify]: Extracting #10: cost 0 inf + 621759
15.432 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  a
  (*.p16 a (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) b))
  a
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
15.441 * * * [progress]: adding candidates to table
20.313 * * [progress]: iteration 4 / 4
20.313 * * * [progress]: picking best candidate
20.671 * * * * [pick]: Picked  #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
20.672 * * * [progress]: localizing error
21.081 * * * [progress]: generating rewritten candidates
21.082 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 1 2 1 1)
21.082 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1)
21.085 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
21.090 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 1 2)
21.092 * * * [progress]: generating series expansions
21.092 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 1 2 1 1)
21.092 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1)
21.092 * * * * [progress]: [ 3 / 4 ] generating series at (2)
21.092 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 1 2)
21.092 * * * [progress]: simplifying candidates
21.092 * * * * [progress]: [ 1 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.092 * * * * [progress]: [ 2 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 3 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 4 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 5 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 6 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (-.p16 (neg.p16 b) (real->posit16 0.0)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 7 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 8 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 9 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (+.p16 (neg.p16 b) (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 10 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 11 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 12 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (+.p16 (neg.p16 b) (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 13 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 14 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.093 * * * * [progress]: [ 15 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 16 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 17 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 18 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 19 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 20 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 21 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 22 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 23 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 24 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.094 * * * * [progress]: [ 25 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.095 * * * * [progress]: [ 26 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 0.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.095 * * * * [progress]: [ 27 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 0.0))))>
21.095 * * * * [progress]: [ 28 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))) (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)))))>
21.095 * * * * [progress]: [ 29 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))) (*.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)))))>
21.095 * * * * [progress]: [ 30 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a)))>
21.095 * * * * [progress]: [ 31 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a)))>
21.095 * * * * [progress]: [ 32 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 1.0)))>
21.095 * * * * [progress]: [ 33 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) a))))>
21.095 * * * * [progress]: [ 34 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.095 * * * * [progress]: [ 35 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.095 * * * * [progress]: [ 36 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.095 * * * * [progress]: [ 37 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 38 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 39 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 40 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 41 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 42 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 43 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 44 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 45 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 46 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 47 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 48 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 49 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 50 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.096 * * * * [progress]: [ 51 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.097 * * * * [progress]: [ 52 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.107 * * * * [progress]: [ 53 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.107 * * * * [progress]: [ 54 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 55 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 56 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 57 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 58 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 59 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 60 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 61 / 83 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 1.0)) a))>
21.108 * * * * [progress]: [ 62 / 83 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (/.p16 (real->posit16 1.0) a)) (real->posit16 2)))>
21.108 * * * * [progress]: [ 63 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 64 / 83 ] simplifiying candidate #<alt (λ (a b c) (quire16->posit16 (posit16->quire16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))))>
21.108 * * * * [progress]: [ 65 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (real->posit16 0.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.108 * * * * [progress]: [ 66 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 0.0)))>
21.108 * * * * [progress]: [ 67 / 83 ] simplifiying candidate #<alt (λ (a b c) (-.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 0.0)))>
21.109 * * * * [progress]: [ 68 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
21.109 * * * * [progress]: [ 69 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 1.0)))>
21.109 * * * * [progress]: [ 70 / 83 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 1.0)))>
21.109 * * * * [progress]: [ 71 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))))>
21.109 * * * * [progress]: [ 72 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 73 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 74 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 75 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 76 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 0.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 77 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 78 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 79 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.109 * * * * [progress]: [ 80 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.110 * * * * [progress]: [ 81 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.110 * * * * [progress]: [ 82 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.110 * * * * [progress]: [ 83 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
21.112 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (real->posit16 0.0))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 0.0))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 0.0))
  (*.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)))
  (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)))
  (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)))
  (*.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 1.0))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 1.0))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))
  (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) a))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (real->posit16 1.0))
  (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (/.p16 (real->posit16 1.0) a))
  (real->posit16 1.0)
  (posit16->quire16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
21.114 * * [simplify]: iteration 0: 48 enodes
21.136 * * [simplify]: iteration 1: 98 enodes
21.183 * * [simplify]: iteration 2: 323 enodes
22.556 * * [simplify]: iteration 3: 1291 enodes
23.311 * * [simplify]: iteration 4: 2065 enodes
24.019 * * [simplify]: iteration complete: 2065 enodes
24.019 * * [simplify]: Extracting #0: cost 18 inf + 0
24.020 * * [simplify]: Extracting #1: cost 268 inf + 0
24.022 * * [simplify]: Extracting #2: cost 522 inf + 486
24.030 * * [simplify]: Extracting #3: cost 660 inf + 7160
24.035 * * [simplify]: Extracting #4: cost 585 inf + 67242
24.041 * * [simplify]: Extracting #5: cost 495 inf + 105287
24.049 * * [simplify]: Extracting #6: cost 486 inf + 110107
24.057 * * [simplify]: Extracting #7: cost 467 inf + 129156
24.080 * * [simplify]: Extracting #8: cost 232 inf + 406359
24.143 * * [simplify]: Extracting #9: cost 69 inf + 677017
24.220 * * [simplify]: Extracting #10: cost 0 inf + 815625
24.276 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 0.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (real->posit16 0.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a))
  (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
24.283 * * * [progress]: adding candidates to table
30.115 * [progress]: [Phase 3 of 3] Extracting.
30.115 * * [regime]: Finding splitpoints for: (#<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (*.p16 a c)))) (+.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))> #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>)
30.120 * * * [regime-changes]: Trying 3 branch expressions: (c b a)
30.120 * * * * [regimes]: Trying to branch on c from (#<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (*.p16 a c)))) (+.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))> #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>)
30.528 * * * * [regimes]: Trying to branch on b from (#<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (*.p16 a c)))) (+.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))> #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>)
31.074 * * * * [regimes]: Trying to branch on a from (#<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (*.p16 a c)))) (+.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))) (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))> #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c)))))))))>)
31.516 * * * [regime]: Found split indices: #<option (#s(si 9 256))>
31.517 * [simplify]: Simplifying:
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))
31.517 * * [simplify]: iteration 0: 20 enodes
31.520 * * [simplify]: iteration complete: 20 enodes
31.521 * * [simplify]: Extracting #0: cost 1 inf + 0
31.521 * * [simplify]: Extracting #1: cost 3 inf + 0
31.521 * * [simplify]: Extracting #2: cost 7 inf + 0
31.521 * * [simplify]: Extracting #3: cost 10 inf + 1
31.521 * * [simplify]: Extracting #4: cost 10 inf + 3
31.521 * * [simplify]: Extracting #5: cost 8 inf + 6
31.521 * * [simplify]: Extracting #6: cost 9 inf + 529
31.521 * * [simplify]: Extracting #7: cost 12 inf + 529
31.521 * * [simplify]: Extracting #8: cost 8 inf + 1174
31.521 * * [simplify]: Extracting #9: cost 4 inf + 2784
31.521 * * [simplify]: Extracting #10: cost 3 inf + 3468
31.522 * * [simplify]: Extracting #11: cost 1 inf + 5596
31.522 * * [simplify]: Extracting #12: cost 0 inf + 7642
31.522 * [simplify]: Simplified to:
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (real->posit16 4) (*.p16 a c))))) a))
31.522 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
31.565 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
31.568 * * * * [points]: Setting MPFR precision to 64
31.569 * * * * [points]: Setting MPFR precision to 320
31.570 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
31.573 * * * * [points]: Setting MPFR precision to 64
31.575 * * * * [points]: Setting MPFR precision to 320
31.577 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
31.580 * * * * [points]: Setting MPFR precision to 64
31.584 * * * * [points]: Setting MPFR precision to 320
31.588 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
31.591 * * * * [points]: Setting MPFR precision to 64
31.599 * * * * [points]: Setting MPFR precision to 320
31.611 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
31.637 * * * * [points]: Setting MPFR precision to 64
31.672 * * * * [points]: Setting MPFR precision to 320
31.692 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
31.695 * * * * [points]: Setting MPFR precision to 64
31.727 * * * * [points]: Setting MPFR precision to 320
31.770 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
31.774 * * * * [points]: Setting MPFR precision to 64
31.884 * * * * [points]: Setting MPFR precision to 320
32.044 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
32.048 * * * * [points]: Setting MPFR precision to 64
32.311 * * * * [points]: Setting MPFR precision to 320
32.879 * * * * [points]: Computing exacts for 8000 points
32.883 * * * * [points]: Setting MPFR precision to 64
33.812 * * * * [points]: Setting MPFR precision to 320
34.937 * * * * [points]: Filtering points with unrepresentable outputs
34.993 * * * * [points]: Sampled 8000 points with exact outputs
48.296 * [regime-testing]: Baseline error score: 1.5134526621927098
48.306 * [regime-testing]: Oracle error score: 1.089167200285717
48.312 * [regime-testing]: End program error score: 1.5134526621927098