1.389 * [progress]: [Phase 1 of 3] Setting up.
0.004 * * * [progress]: [1/2] Preparing points
0.005 * * * * [points]: Sampling 256 additional inputs, on iter 0 have 0 / 256
0.008 * * * * [points]: Computing exacts on every 16 of 256 points to ramp up precision
0.116 * * * * [points]: Setting MPFR precision to 64
0.120 * * * * [points]: Setting MPFR precision to 320
0.122 * * * * [points]: Computing exacts on every 8 of 256 points to ramp up precision
0.128 * * * * [points]: Setting MPFR precision to 64
0.131 * * * * [points]: Setting MPFR precision to 320
0.135 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.140 * * * * [points]: Setting MPFR precision to 64
0.146 * * * * [points]: Setting MPFR precision to 320
0.152 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.157 * * * * [points]: Setting MPFR precision to 64
0.167 * * * * [points]: Setting MPFR precision to 320
0.178 * * * * [points]: Computing exacts for 256 points
0.183 * * * * [points]: Setting MPFR precision to 64
0.214 * * * * [points]: Setting MPFR precision to 320
0.248 * * * * [points]: Filtering points with unrepresentable outputs
0.250 * * * * [points]: Sampled 256 points with exact outputs
0.251 * * * [progress]: [2/2] Setting up program.
0.339 * [progress]: [Phase 2 of 3] Improving.
0.341 * * * * [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.344 * [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.345 * * [simplify]: iteration 0: 16 enodes
0.357 * * [simplify]: iteration 1: 27 enodes
0.366 * * [simplify]: iteration 2: 35 enodes
0.375 * * [simplify]: iteration 3: 37 enodes
0.384 * * [simplify]: iteration complete: 37 enodes
0.384 * * [simplify]: Extracting #0: cost 1 inf + 0
0.385 * * [simplify]: Extracting #1: cost 5 inf + 0
0.385 * * [simplify]: Extracting #2: cost 9 inf + 1
0.385 * * [simplify]: Extracting #3: cost 10 inf + 2
0.385 * * [simplify]: Extracting #4: cost 9 inf + 407
0.385 * * [simplify]: Extracting #5: cost 13 inf + 728
0.386 * * [simplify]: Extracting #6: cost 12 inf + 1051
0.386 * * [simplify]: Extracting #7: cost 11 inf + 1052
0.386 * * [simplify]: Extracting #8: cost 5 inf + 4107
0.387 * * [simplify]: Extracting #9: cost 1 inf + 9604
0.387 * * [simplify]: Extracting #10: cost 0 inf + 11289
0.388 * [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.393 * * [progress]: iteration 1 / 4
0.393 * * * [progress]: picking best candidate
0.468 * * * * [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.468 * * * [progress]: localizing error
0.920 * * * [progress]: generating rewritten candidates
0.920 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
0.927 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 2)
0.927 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
0.934 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1)
0.946 * * * [progress]: generating series expansions
0.946 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
0.946 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 2)
0.947 * * * * [progress]: [ 3 / 4 ] generating series at (2)
0.947 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1)
0.947 * * * [progress]: simplifying candidates
0.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.947 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.948 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.949 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.950 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.951 * * * * [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.952 * * * * [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.952 * * * * [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.952 * * * * [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.952 * * * * [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.952 * * * * [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.952 * * * * [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.952 * * * * [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.953 * [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.955 * * [simplify]: iteration 0: 60 enodes
0.976 * * [simplify]: iteration 1: 118 enodes
1.039 * * [simplify]: iteration 2: 543 enodes
1.307 * * [simplify]: iteration 3: 2004 enodes
1.873 * * [simplify]: iteration complete: 2004 enodes
1.873 * * [simplify]: Extracting #0: cost 31 inf + 0
1.874 * * [simplify]: Extracting #1: cost 298 inf + 0
1.877 * * [simplify]: Extracting #2: cost 615 inf + 2099
1.890 * * [simplify]: Extracting #3: cost 725 inf + 51587
1.917 * * [simplify]: Extracting #4: cost 380 inf + 297212
1.966 * * [simplify]: Extracting #5: cost 164 inf + 549661
2.022 * * [simplify]: Extracting #6: cost 3 inf + 789755
2.089 * * [simplify]: Extracting #7: cost 0 inf + 793889
2.164 * [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))
2.174 * * * [progress]: adding candidates to table
3.526 * * [progress]: iteration 2 / 4
3.526 * * * [progress]: picking best candidate
3.684 * * * * [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)))>
3.684 * * * [progress]: localizing error
3.940 * * * [progress]: generating rewritten candidates
3.940 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 2 1 1)
3.940 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1)
3.943 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 2)
3.943 * * * * [progress]: [ 4 / 4 ] rewriting at (2)
3.948 * * * [progress]: generating series expansions
3.948 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 2 1 1)
3.948 * * * * [progress]: [ 2 / 4 ] generating series at (2 1)
3.948 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 2)
3.948 * * * * [progress]: [ 4 / 4 ] generating series at (2)
3.948 * * * [progress]: simplifying candidates
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.948 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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)))>
3.949 * * * * [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))>
3.949 * * * * [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))))))))>
3.949 * * * * [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))))))))>
3.949 * * * * [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))))))))>
3.949 * * * * [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))))))))>
3.949 * * * * [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))))))))>
3.949 * * * * [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))))))))>
3.950 * * * * [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))))))))>
3.950 * * * * [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))))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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))))))))>
3.950 * * * * [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))))>
3.950 * * * * [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))))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))))>
3.950 * * * * [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))))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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))))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.950 * * * * [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)))>
3.951 * [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))
3.952 * * [simplify]: iteration 0: 43 enodes
3.960 * * [simplify]: iteration 1: 71 enodes
3.983 * * [simplify]: iteration 2: 303 enodes
4.560 * * [simplify]: iteration 3: 1964 enodes
5.355 * * [simplify]: iteration 4: 2053 enodes
5.744 * * [simplify]: iteration complete: 2053 enodes
5.744 * * [simplify]: Extracting #0: cost 22 inf + 0
5.745 * * [simplify]: Extracting #1: cost 211 inf + 0
5.747 * * [simplify]: Extracting #2: cost 381 inf + 209
5.751 * * [simplify]: Extracting #3: cost 357 inf + 27243
5.782 * * [simplify]: Extracting #4: cost 88 inf + 230353
5.826 * * [simplify]: Extracting #5: cost 0 inf + 325568
5.873 * [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))
5.881 * * * [progress]: adding candidates to table
7.272 * * [progress]: iteration 3 / 4
7.272 * * * [progress]: picking best candidate
7.506 * * * * [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)) a))>
7.506 * * * [progress]: localizing error
7.844 * * * [progress]: generating rewritten candidates
7.844 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 1 2 1 1)
7.844 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1)
7.849 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 1 2)
7.850 * * * * [progress]: [ 4 / 4 ] rewriting at (2)
7.861 * * * [progress]: generating series expansions
7.861 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 1 2 1 1)
7.861 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1)
7.861 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 1 2)
7.861 * * * * [progress]: [ 4 / 4 ] generating series at (2)
7.861 * * * [progress]: simplifying candidates
7.861 * * * * [progress]: [ 1 / 74 ] 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)) a))>
7.861 * * * * [progress]: [ 2 / 74 ] 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)) a))>
7.861 * * * * [progress]: [ 3 / 74 ] 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)) a))>
7.861 * * * * [progress]: [ 4 / 74 ] 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)) a))>
7.861 * * * * [progress]: [ 5 / 74 ] 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)) a))>
7.861 * * * * [progress]: [ 6 / 74 ] 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)) a))>
7.861 * * * * [progress]: [ 7 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 8 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 9 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 10 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 11 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 12 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 13 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 14 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 15 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 16 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 17 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 18 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 19 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 20 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 21 / 74 ] 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)) a))>
7.862 * * * * [progress]: [ 22 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 23 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 24 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 25 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 26 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 27 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 28 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 29 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 30 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 31 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 32 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 33 / 74 ] 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)) a))>
7.863 * * * * [progress]: [ 34 / 74 ] 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 a (real->posit16 1.0))))>
7.863 * * * * [progress]: [ 35 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 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)))))>
7.863 * * * * [progress]: [ 36 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.863 * * * * [progress]: [ 37 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 38 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.864 * * * * [progress]: [ 39 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 40 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 41 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.864 * * * * [progress]: [ 42 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 43 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 44 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.864 * * * * [progress]: [ 45 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 46 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 47 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.864 * * * * [progress]: [ 48 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 49 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.864 * * * * [progress]: [ 50 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.864 * * * * [progress]: [ 51 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.865 * * * * [progress]: [ 52 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.865 * * * * [progress]: [ 53 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.865 * * * * [progress]: [ 54 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.865 * * * * [progress]: [ 55 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 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)))))>
7.865 * * * * [progress]: [ 56 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 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 1.0)))))>
7.865 * * * * [progress]: [ 57 / 74 ] 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 a (/.p16 (real->posit16 1.0) (real->posit16 2)))))>
7.865 * * * * [progress]: [ 58 / 74 ] 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 a (/.p16 (real->posit16 1.0) (real->posit16 2)))))>
7.865 * * * * [progress]: [ 59 / 74 ] 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 a (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))>
7.865 * * * * [progress]: [ 60 / 74 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 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)))))>
7.865 * * * * [progress]: [ 61 / 74 ] 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 a (real->posit16 1.0))))>
7.865 * * * * [progress]: [ 62 / 74 ] 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 a (real->posit16 2))))>
7.865 * * * * [progress]: [ 63 / 74 ] 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)) a)))>
7.866 * * * * [progress]: [ 64 / 74 ] 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)) a))))>
7.866 * * * * [progress]: [ 65 / 74 ] 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)) a)))>
7.866 * * * * [progress]: [ 66 / 74 ] 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)) a) (real->posit16 0.0)))>
7.866 * * * * [progress]: [ 67 / 74 ] 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)) a) (real->posit16 0.0)))>
7.866 * * * * [progress]: [ 68 / 74 ] 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)) a)))>
7.866 * * * * [progress]: [ 69 / 74 ] 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)) a) (real->posit16 1.0)))>
7.866 * * * * [progress]: [ 70 / 74 ] 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)) a) (real->posit16 1.0)))>
7.866 * * * * [progress]: [ 71 / 74 ] 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.866 * * * * [progress]: [ 72 / 74 ] 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.866 * * * * [progress]: [ 73 / 74 ] 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.866 * * * * [progress]: [ 74 / 74 ] 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.868 * [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 (real->posit16 1.0))
  (/.p16 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 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 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 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 1.0)))
  (/.p16 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 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 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 1.0)))
  (/.p16 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 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 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 1.0)))
  (/.p16 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 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 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 1.0)))
  (/.p16 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 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 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 1.0)))
  (/.p16 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 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 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 1.0)))
  (/.p16 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 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 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 1.0)))
  (/.p16 a (/.p16 (real->posit16 1.0) (real->posit16 2)))
  (/.p16 a (/.p16 (real->posit16 1.0) (real->posit16 2)))
  (/.p16 a (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 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 a (real->posit16 1.0))
  (*.p16 a (real->posit16 2))
  (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)) 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 (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))))) (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))
7.869 * * [simplify]: iteration 0: 44 enodes
7.896 * * [simplify]: iteration 1: 65 enodes
7.922 * * [simplify]: iteration 2: 199 enodes
8.185 * * [simplify]: iteration 3: 1015 enodes
8.501 * * [simplify]: iteration 4: 2057 enodes
9.080 * * [simplify]: iteration complete: 2057 enodes
9.081 * * [simplify]: Extracting #0: cost 18 inf + 0
9.081 * * [simplify]: Extracting #1: cost 161 inf + 1
9.083 * * [simplify]: Extracting #2: cost 412 inf + 4
9.090 * * [simplify]: Extracting #3: cost 732 inf + 40901
9.119 * * [simplify]: Extracting #4: cost 309 inf + 243437
9.148 * * [simplify]: Extracting #5: cost 282 inf + 256002
9.178 * * [simplify]: Extracting #6: cost 279 inf + 257731
9.213 * * [simplify]: Extracting #7: cost 234 inf + 305617
9.273 * * [simplify]: Extracting #8: cost 42 inf + 518300
9.347 * * [simplify]: Extracting #9: cost 1 inf + 567581
9.393 * * [simplify]: Extracting #10: cost 0 inf + 568826
9.470 * [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)
  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) (-.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 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 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 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 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 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 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 a (-.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 2) a)
  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))))))
  a
  (*.p16 (real->posit16 2) 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)
  (/.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))))) (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))
9.480 * * * [progress]: adding candidates to table
10.916 * * [progress]: iteration 4 / 4
10.916 * * * [progress]: picking best candidate
11.168 * * * * [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)))>
11.168 * * * [progress]: localizing error
11.909 * * * [progress]: generating rewritten candidates
11.909 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 1 2 1 1)
11.910 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1)
11.912 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 1 2)
11.912 * * * * [progress]: [ 4 / 4 ] rewriting at (2)
11.917 * * * [progress]: generating series expansions
11.917 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 1 2 1 1)
11.918 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1)
11.918 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 1 2)
11.918 * * * * [progress]: [ 4 / 4 ] generating series at (2)
11.918 * * * [progress]: simplifying candidates
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.918 * * * * [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)))>
11.919 * * * * [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)))>
11.919 * * * * [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)))>
11.919 * * * * [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)))>
11.919 * * * * [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)))>
11.919 * * * * [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)))>
11.919 * * * * [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)))>
11.919 * * * * [progress]: [ 26 / 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)))>
11.919 * * * * [progress]: [ 27 / 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)))>
11.919 * * * * [progress]: [ 28 / 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)))>
11.919 * * * * [progress]: [ 29 / 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)))>
11.919 * * * * [progress]: [ 30 / 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)))>
11.919 * * * * [progress]: [ 31 / 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)))>
11.919 * * * * [progress]: [ 32 / 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)))>
11.919 * * * * [progress]: [ 33 / 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)))>
11.919 * * * * [progress]: [ 34 / 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))))>
11.919 * * * * [progress]: [ 35 / 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))))>
11.919 * * * * [progress]: [ 36 / 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)))))>
11.919 * * * * [progress]: [ 37 / 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)))))>
11.919 * * * * [progress]: [ 38 / 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)))>
11.919 * * * * [progress]: [ 39 / 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)))>
11.919 * * * * [progress]: [ 40 / 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)))>
11.919 * * * * [progress]: [ 41 / 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))))>
11.919 * * * * [progress]: [ 42 / 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))))>
11.919 * * * * [progress]: [ 43 / 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))))>
11.920 * * * * [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))))>
11.920 * * * * [progress]: [ 45 / 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))))>
11.920 * * * * [progress]: [ 46 / 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))))>
11.920 * * * * [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))))>
11.920 * * * * [progress]: [ 48 / 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))))>
11.920 * * * * [progress]: [ 49 / 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))))>
11.920 * * * * [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))))>
11.920 * * * * [progress]: [ 51 / 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))))>
11.920 * * * * [progress]: [ 52 / 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))))>
11.920 * * * * [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))))>
11.920 * * * * [progress]: [ 54 / 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))))>
11.920 * * * * [progress]: [ 55 / 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))))>
11.920 * * * * [progress]: [ 56 / 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))))>
11.920 * * * * [progress]: [ 57 / 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))))>
11.920 * * * * [progress]: [ 58 / 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))))>
11.920 * * * * [progress]: [ 59 / 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))))>
11.920 * * * * [progress]: [ 60 / 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))))>
11.920 * * * * [progress]: [ 61 / 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))))>
11.920 * * * * [progress]: [ 62 / 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))))>
11.920 * * * * [progress]: [ 63 / 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))))>
11.920 * * * * [progress]: [ 64 / 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))))>
11.920 * * * * [progress]: [ 65 / 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))))>
11.920 * * * * [progress]: [ 66 / 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))))>
11.921 * * * * [progress]: [ 67 / 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))))>
11.921 * * * * [progress]: [ 68 / 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))))>
11.921 * * * * [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)) (real->posit16 1.0)) a))>
11.921 * * * * [progress]: [ 70 / 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)))>
11.921 * * * * [progress]: [ 71 / 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))))>
11.921 * * * * [progress]: [ 72 / 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)))))>
11.921 * * * * [progress]: [ 73 / 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))))>
11.921 * * * * [progress]: [ 74 / 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)))>
11.921 * * * * [progress]: [ 75 / 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)))>
11.921 * * * * [progress]: [ 76 / 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))))>
11.921 * * * * [progress]: [ 77 / 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)))>
11.921 * * * * [progress]: [ 78 / 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)))>
11.921 * * * * [progress]: [ 79 / 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))))>
11.921 * * * * [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)))>
11.921 * * * * [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)))>
11.921 * * * * [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)))>
11.921 * * * * [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)))>
11.922 * [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 (-.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)
  (/.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)
11.923 * * [simplify]: iteration 0: 48 enodes
11.933 * * [simplify]: iteration 1: 98 enodes
11.974 * * [simplify]: iteration 2: 302 enodes
12.878 * * [simplify]: iteration 3: 1357 enodes
13.890 * * [simplify]: iteration 4: 2035 enodes
14.635 * * [simplify]: iteration complete: 2035 enodes
14.635 * * [simplify]: Extracting #0: cost 18 inf + 0
14.636 * * [simplify]: Extracting #1: cost 231 inf + 0
14.638 * * [simplify]: Extracting #2: cost 550 inf + 730
14.641 * * [simplify]: Extracting #3: cost 608 inf + 17244
14.647 * * [simplify]: Extracting #4: cost 529 inf + 80610
14.655 * * [simplify]: Extracting #5: cost 468 inf + 106691
14.685 * * [simplify]: Extracting #6: cost 280 inf + 328091
14.763 * * [simplify]: Extracting #7: cost 72 inf + 649184
14.842 * * [simplify]: Extracting #8: cost 0 inf + 793541
14.950 * [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)
  (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 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)))
  (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 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)))
  (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 a (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))))) (*.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 (-.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 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))))) 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 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))))) 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 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))))) 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 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))))) 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 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))))) 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 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))))) 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 a (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 (-.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 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)
  (/.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)
14.963 * * * [progress]: adding candidates to table
16.791 * [progress]: [Phase 3 of 3] Extracting.
16.791 * * [regime]: Finding splitpoints for: (#<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 (-.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))> #<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 (/.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)))))) (real->posit16 2)) a))> #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.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 (/.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)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<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 (*.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))))))))> #<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 1.0) (*.p16 (real->posit16 2) a))))>)
16.799 * * * [regime-changes]: Trying 3 branch expressions: (c b a)
16.800 * * * * [regimes]: Trying to branch on c from (#<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 (-.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))> #<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 (/.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)))))) (real->posit16 2)) a))> #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.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 (/.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)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<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 (*.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))))))))> #<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 1.0) (*.p16 (real->posit16 2) a))))>)
17.308 * * * * [regimes]: Trying to branch on b from (#<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 (-.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))> #<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 (/.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)))))) (real->posit16 2)) a))> #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.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 (/.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)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<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 (*.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))))))))> #<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 1.0) (*.p16 (real->posit16 2) a))))>)
17.828 * * * * [regimes]: Trying to branch on a from (#<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 (-.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))> #<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 (/.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)))))) (real->posit16 2)) a))> #<alt (λ (a b c) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.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 (/.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)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<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 (*.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))))))))> #<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 1.0) (*.p16 (real->posit16 2) a))))>)
18.168 * * * [regime]: Found split indices: #<option (#s(si 1 256))>
18.168 * [simplify]: Simplifying:
  (/.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)
18.168 * * [simplify]: iteration 0: 17 enodes
18.169 * * [simplify]: iteration complete: 17 enodes
18.169 * * [simplify]: Extracting #0: cost 1 inf + 0
18.170 * * [simplify]: Extracting #1: cost 3 inf + 0
18.170 * * [simplify]: Extracting #2: cost 4 inf + 1
18.170 * * [simplify]: Extracting #3: cost 7 inf + 1
18.170 * * [simplify]: Extracting #4: cost 7 inf + 3
18.170 * * [simplify]: Extracting #5: cost 7 inf + 4
18.170 * * [simplify]: Extracting #6: cost 9 inf + 85
18.170 * * [simplify]: Extracting #7: cost 12 inf + 85
18.170 * * [simplify]: Extracting #8: cost 7 inf + 730
18.170 * * [simplify]: Extracting #9: cost 5 inf + 1696
18.170 * * [simplify]: Extracting #10: cost 3 inf + 3024
18.170 * * [simplify]: Extracting #11: cost 1 inf + 5153
18.175 * * [simplify]: Extracting #12: cost 0 inf + 6878
18.176 * [simplify]: Simplified to:
  (/.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)
18.176 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
18.209 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
18.212 * * * * [points]: Setting MPFR precision to 64
18.213 * * * * [points]: Setting MPFR precision to 320
18.214 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
18.217 * * * * [points]: Setting MPFR precision to 64
18.219 * * * * [points]: Setting MPFR precision to 320
18.221 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
18.224 * * * * [points]: Setting MPFR precision to 64
18.228 * * * * [points]: Setting MPFR precision to 320
18.233 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
18.235 * * * * [points]: Setting MPFR precision to 64
18.246 * * * * [points]: Setting MPFR precision to 320
18.262 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
18.267 * * * * [points]: Setting MPFR precision to 64
18.300 * * * * [points]: Setting MPFR precision to 320
18.332 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
18.338 * * * * [points]: Setting MPFR precision to 64
18.446 * * * * [points]: Setting MPFR precision to 320
18.506 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
18.512 * * * * [points]: Setting MPFR precision to 64
18.682 * * * * [points]: Setting MPFR precision to 320
18.812 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
18.818 * * * * [points]: Setting MPFR precision to 64
19.125 * * * * [points]: Setting MPFR precision to 320
19.494 * * * * [points]: Computing exacts for 8000 points
19.499 * * * * [points]: Setting MPFR precision to 64
21.150 * * * * [points]: Setting MPFR precision to 320
22.416 * * * * [points]: Filtering points with unrepresentable outputs
22.455 * * * * [points]: Sampled 8000 points with exact outputs
35.599 * [regime-testing]: Baseline error score: 1.5121696114526857
35.602 * [regime-testing]: Oracle error score: 1.1124465597021251
35.611 * [regime-testing]: End program error score: 1.5121696114526857