0.667 * [progress]: [Phase 1 of 3] Setting up.
0.004 * * * [progress]: [1/2] Preparing points
0.006 * * * * [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.156 * * * * [points]: Setting MPFR precision to 64
0.161 * * * * [points]: Setting MPFR precision to 320
0.164 * * * * [points]: Computing exacts on every 8 of 256 points to ramp up precision
0.170 * * * * [points]: Setting MPFR precision to 64
0.173 * * * * [points]: Setting MPFR precision to 320
0.177 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.216 * * * * [points]: Setting MPFR precision to 64
0.225 * * * * [points]: Setting MPFR precision to 320
0.235 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.242 * * * * [points]: Setting MPFR precision to 64
0.254 * * * * [points]: Setting MPFR precision to 320
0.299 * * * * [points]: Computing exacts for 256 points
0.310 * * * * [points]: Setting MPFR precision to 64
0.342 * * * * [points]: Setting MPFR precision to 320
0.419 * * * * [points]: Filtering points with unrepresentable outputs
0.421 * * * * [points]: Sampled 256 points with exact outputs
0.421 * * * [progress]: [2/2] Setting up program.
0.458 * [progress]: [Phase 2 of 3] Improving.
0.459 * * * * [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.462 * [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.464 * * [simplify]: iteration 0: 16 enodes
0.476 * * [simplify]: iteration 1: 27 enodes
0.488 * * [simplify]: iteration 2: 35 enodes
0.499 * * [simplify]: iteration 3: 37 enodes
0.509 * * [simplify]: iteration complete: 37 enodes
0.509 * * [simplify]: Extracting #0: cost 1 inf + 0
0.509 * * [simplify]: Extracting #1: cost 5 inf + 0
0.510 * * [simplify]: Extracting #2: cost 9 inf + 1
0.510 * * [simplify]: Extracting #3: cost 10 inf + 2
0.510 * * [simplify]: Extracting #4: cost 9 inf + 407
0.510 * * [simplify]: Extracting #5: cost 13 inf + 728
0.511 * * [simplify]: Extracting #6: cost 12 inf + 1051
0.511 * * [simplify]: Extracting #7: cost 11 inf + 1052
0.511 * * [simplify]: Extracting #8: cost 5 inf + 4107
0.512 * * [simplify]: Extracting #9: cost 1 inf + 9604
0.513 * * [simplify]: Extracting #10: cost 0 inf + 11289
0.514 * [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.517 * * [progress]: iteration 1 / 4
0.517 * * * [progress]: picking best candidate
0.552 * * * * [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.552 * * * [progress]: localizing error
0.820 * * * [progress]: generating rewritten candidates
0.820 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
0.827 * * * * [progress]: [ 2 / 4 ] rewriting at (2)
0.834 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 2)
0.835 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1 2)
0.843 * * * [progress]: generating series expansions
0.843 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
0.843 * * * * [progress]: [ 2 / 4 ] generating series at (2)
0.843 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 2)
0.843 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1 2)
0.843 * * * [progress]: simplifying candidates
0.843 * * * * [progress]: [ 1 / 85 ] 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.843 * * * * [progress]: [ 2 / 85 ] 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.843 * * * * [progress]: [ 3 / 85 ] 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.843 * * * * [progress]: [ 4 / 85 ] 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.843 * * * * [progress]: [ 5 / 85 ] 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.843 * * * * [progress]: [ 6 / 85 ] 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.844 * * * * [progress]: [ 7 / 85 ] 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.844 * * * * [progress]: [ 8 / 85 ] 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.844 * * * * [progress]: [ 9 / 85 ] 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.844 * * * * [progress]: [ 10 / 85 ] 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.844 * * * * [progress]: [ 11 / 85 ] 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.844 * * * * [progress]: [ 12 / 85 ] 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.844 * * * * [progress]: [ 13 / 85 ] 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.844 * * * * [progress]: [ 14 / 85 ] 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.844 * * * * [progress]: [ 15 / 85 ] 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.844 * * * * [progress]: [ 16 / 85 ] 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.844 * * * * [progress]: [ 17 / 85 ] 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.844 * * * * [progress]: [ 18 / 85 ] 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.844 * * * * [progress]: [ 19 / 85 ] 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.844 * * * * [progress]: [ 20 / 85 ] 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.844 * * * * [progress]: [ 21 / 85 ] 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.844 * * * * [progress]: [ 22 / 85 ] 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.844 * * * * [progress]: [ 23 / 85 ] 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.844 * * * * [progress]: [ 24 / 85 ] 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.844 * * * * [progress]: [ 25 / 85 ] 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.844 * * * * [progress]: [ 26 / 85 ] 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.844 * * * * [progress]: [ 27 / 85 ] 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.844 * * * * [progress]: [ 28 / 85 ] 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.844 * * * * [progress]: [ 29 / 85 ] 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.844 * * * * [progress]: [ 30 / 85 ] 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.844 * * * * [progress]: [ 31 / 85 ] 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.845 * * * * [progress]: [ 32 / 85 ] 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.845 * * * * [progress]: [ 33 / 85 ] 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.845 * * * * [progress]: [ 34 / 85 ] 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.845 * * * * [progress]: [ 35 / 85 ] 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.845 * * * * [progress]: [ 36 / 85 ] 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.845 * * * * [progress]: [ 37 / 85 ] 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.845 * * * * [progress]: [ 38 / 85 ] 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.845 * * * * [progress]: [ 39 / 85 ] 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.845 * * * * [progress]: [ 40 / 85 ] 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.845 * * * * [progress]: [ 41 / 85 ] 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.845 * * * * [progress]: [ 42 / 85 ] 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.845 * * * * [progress]: [ 43 / 85 ] 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.845 * * * * [progress]: [ 44 / 85 ] 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.845 * * * * [progress]: [ 45 / 85 ] 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.845 * * * * [progress]: [ 46 / 85 ] 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.845 * * * * [progress]: [ 47 / 85 ] 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.845 * * * * [progress]: [ 48 / 85 ] 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.845 * * * * [progress]: [ 49 / 85 ] 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.845 * * * * [progress]: [ 50 / 85 ] 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.845 * * * * [progress]: [ 51 / 85 ] 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.845 * * * * [progress]: [ 52 / 85 ] 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.845 * * * * [progress]: [ 53 / 85 ] 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.845 * * * * [progress]: [ 54 / 85 ] 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.845 * * * * [progress]: [ 55 / 85 ] 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.845 * * * * [progress]: [ 56 / 85 ] 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.846 * * * * [progress]: [ 57 / 85 ] 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.846 * * * * [progress]: [ 58 / 85 ] 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.846 * * * * [progress]: [ 59 / 85 ] 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.846 * * * * [progress]: [ 60 / 85 ] 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.846 * * * * [progress]: [ 61 / 85 ] 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.846 * * * * [progress]: [ 62 / 85 ] 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.846 * * * * [progress]: [ 63 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (*.p16 (real->posit16 4) (real->posit16 0.0)) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 64 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 (real->posit16 4) (real->posit16 0.0)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 65 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (*.p16 (real->posit16 0.0) (real->posit16 4)) (*.p16 (*.p16 a c) (real->posit16 4)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 66 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (*.p16 (*.p16 a c) (real->posit16 4)) (*.p16 (real->posit16 0.0) (real->posit16 4)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 67 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 68 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 1.0) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 69 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 1.0) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 70 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 (real->posit16 1.0) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 71 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (/.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 1.0))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 72 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (/.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 1.0))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 73 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 1.0) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 74 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (quire16->posit16 (posit16->quire16 (*.p16 (real->posit16 4) (*.p16 a c))))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 75 / 85 ] 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.846 * * * * [progress]: [ 76 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 0.0))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 77 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (-.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 0.0))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 78 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 1.0) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 79 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 1.0))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 80 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (/.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (real->posit16 1.0))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 81 / 85 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a)))>
0.846 * * * * [progress]: [ 82 / 85 ] 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.847 * * * * [progress]: [ 83 / 85 ] 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.847 * * * * [progress]: [ 84 / 85 ] 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.847 * * * * [progress]: [ 85 / 85 ] 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.847 * [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)
  (/.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)
  (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 (real->posit16 4) (real->posit16 0.0))
  (*.p16 (real->posit16 4) (*.p16 a c))
  (*.p16 (real->posit16 4) (*.p16 a c))
  (*.p16 (real->posit16 4) (real->posit16 0.0))
  (*.p16 (real->posit16 0.0) (real->posit16 4))
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 (real->posit16 0.0) (real->posit16 4))
  (*.p16 (real->posit16 4) a)
  (*.p16 (real->posit16 4) (*.p16 a c))
  (*.p16 (real->posit16 4) (*.p16 a c))
  (*.p16 (real->posit16 1.0) (*.p16 a c))
  (*.p16 (real->posit16 4) (*.p16 a c))
  (*.p16 (real->posit16 4) (*.p16 a c))
  (real->posit16 1.0)
  (posit16->quire16 (*.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))))) (*.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.848 * * [simplify]: iteration 0: 48 enodes
0.858 * * [simplify]: iteration 1: 89 enodes
0.891 * * [simplify]: iteration 2: 346 enodes
1.446 * * [simplify]: iteration 3: 2096 enodes
2.078 * * [simplify]: iteration complete: 5003 enodes
2.078 * * [simplify]: Extracting #0: cost 25 inf + 0
2.079 * * [simplify]: Extracting #1: cost 289 inf + 0
2.084 * * [simplify]: Extracting #2: cost 876 inf + 649
2.095 * * [simplify]: Extracting #3: cost 2169 inf + 33210
2.146 * * [simplify]: Extracting #4: cost 1187 inf + 597125
2.268 * * [simplify]: Extracting #5: cost 167 inf + 1574507
2.440 * * [simplify]: Extracting #6: cost 5 inf + 1786457
2.607 * * [simplify]: Extracting #7: cost 0 inf + 1794723
2.746 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) a) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 2))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (*.p16 a (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 2)))
  (*.p16 (*.p16 a (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) 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)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (real->posit16 4) a) c)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (real->posit16 0.0)
  (*.p16 (real->posit16 4) a)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (*.p16 a c)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (*.p16 (*.p16 (real->posit16 4) a) c)
  (real->posit16 1.0)
  (posit16->quire16 (*.p16 (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 2)))
2.755 * * * [progress]: adding candidates to table
4.017 * * [progress]: iteration 2 / 4
4.018 * * * [progress]: picking best candidate
4.182 * * * * [pick]: Picked  #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.183 * * * [progress]: localizing error
4.451 * * * [progress]: generating rewritten candidates
4.451 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
4.458 * * * * [progress]: [ 2 / 4 ] rewriting at (2)
4.472 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 2)
4.472 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1)
4.487 * * * [progress]: generating series expansions
4.487 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
4.487 * * * * [progress]: [ 2 / 4 ] generating series at (2)
4.487 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 2)
4.487 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1)
4.487 * * * [progress]: simplifying candidates
4.487 * * * * [progress]: [ 1 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 2 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 3 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 4 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 5 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 6 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (real->posit16 0.0)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 7 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
4.487 * * * * [progress]: [ 8 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 9 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (neg.p16 b) (-.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 10 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 11 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 12 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (neg.p16 b) (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 13 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 14 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 15 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 16 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 17 / 84 ] 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 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 18 / 84 ] 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 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 19 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 20 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 21 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 22 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
4.488 * * * * [progress]: [ 23 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.489 * * * * [progress]: [ 24 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
4.489 * * * * [progress]: [ 25 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
4.489 * * * * [progress]: [ 26 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) a))>
4.489 * * * * [progress]: [ 27 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 28 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 29 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 30 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 31 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 32 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 33 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 34 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
4.489 * * * * [progress]: [ 35 / 84 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
4.489 * * * * [progress]: [ 36 / 84 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
4.489 * * * * [progress]: [ 37 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))))>
4.489 * * * * [progress]: [ 38 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
4.490 * * * * [progress]: [ 39 / 84 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
4.490 * * * * [progress]: [ 40 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 41 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 42 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 43 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 44 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 45 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 46 / 84 ] 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 (*.p16 (real->posit16 4) a) c)))) a)))>
4.490 * * * * [progress]: [ 47 / 84 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
4.490 * * * * [progress]: [ 48 / 84 ] simplifiying candidate #<alt (λ (a b c) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))))>
4.490 * * * * [progress]: [ 49 / 84 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
4.490 * * * * [progress]: [ 50 / 84 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
4.490 * * * * [progress]: [ 51 / 84 ] simplifiying candidate #<alt (λ (a b c) (-.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
4.490 * * * * [progress]: [ 52 / 84 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
4.490 * * * * [progress]: [ 53 / 84 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
4.490 * * * * [progress]: [ 54 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
4.491 * * * * [progress]: [ 55 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 56 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 57 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 58 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 59 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 60 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 61 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 62 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 63 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (real->posit16 0.0)) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 64 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 65 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 66 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (*.p16 b b) (-.p16 (real->posit16 0.0) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 67 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (+.p16 (real->posit16 0.0) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 68 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
4.491 * * * * [progress]: [ 69 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (*.p16 b b) (neg.p16 (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 70 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (*.p16 (real->posit16 4) a) c) (*.p16 (*.p16 (real->posit16 4) a) c))) (+.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 71 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 72 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (posit16->quire16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 73 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) a) c) (real->posit16 1.0))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 74 / 84 ] 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) a) c)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 75 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 76 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (+.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 77 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)) (real->posit16 0.0)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 78 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 79 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (*.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)) (real->posit16 1.0)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 80 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)) (real->posit16 1.0)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 81 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 82 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 83 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.492 * * * * [progress]: [ 84 / 84 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
4.494 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (real->posit16 0.0))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) a) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (real->posit16 2))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
  (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) 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 b b) (real->posit16 0.0))
  (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))
  (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))
  (-.p16 (real->posit16 0.0) (*.p16 (*.p16 (real->posit16 4) a) c))
  (+.p16 (real->posit16 0.0) (*.p16 (*.p16 (real->posit16 4) a) c))
  (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))
  (neg.p16 (*.p16 (*.p16 (real->posit16 4) a) c))
  (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (*.p16 (real->posit16 4) a) c) (*.p16 (*.p16 (real->posit16 4) a) c)))
  (+.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (*.p16 (real->posit16 4) a) c) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
4.496 * * [simplify]: iteration 0: 54 enodes
4.517 * * [simplify]: iteration 1: 102 enodes
4.569 * * [simplify]: iteration 2: 414 enodes
5.209 * * [simplify]: iteration 3: 2520 enodes
6.286 * * [simplify]: iteration complete: 5020 enodes
6.286 * * [simplify]: Extracting #0: cost 30 inf + 0
6.295 * * [simplify]: Extracting #1: cost 416 inf + 0
6.301 * * [simplify]: Extracting #2: cost 1233 inf + 3911
6.315 * * [simplify]: Extracting #3: cost 1732 inf + 75831
6.351 * * [simplify]: Extracting #4: cost 1201 inf + 384847
6.436 * * [simplify]: Extracting #5: cost 651 inf + 931961
6.562 * * [simplify]: Extracting #6: cost 349 inf + 1355194
6.687 * * [simplify]: Extracting #7: cost 28 inf + 1863570
6.825 * * [simplify]: Extracting #8: cost 0 inf + 1910183
6.991 * [simplify]: Simplified to:
  (-.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)))))
  (neg.p16 b)
  (-.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)))))
  (neg.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)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (*.p16 (+.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 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) b)
  (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)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (*.p16 a (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
  (*.p16 (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) b) (*.p16 a (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 (-.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 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)
  (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 b b)
  (-.p16 (*.p16 b b) (*.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 (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 (real->posit16 4) (*.p16 a c)) (*.p16 b b)) (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))
  (+.p16 (*.p16 (real->posit16 4) (*.p16 a c)) (*.p16 b b))
  (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)) (*.p16 (real->posit16 4) 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 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 a (real->posit16 2)))
7.003 * * * [progress]: adding candidates to table
9.103 * * [progress]: iteration 3 / 4
9.103 * * * [progress]: picking best candidate
9.265 * * * * [pick]: Picked  #<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) a) c)))) (*.p16 (real->posit16 2) a)))>
9.265 * * * [progress]: localizing error
9.640 * * * [progress]: generating rewritten candidates
9.640 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 2 1 1)
9.642 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1)
9.650 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
9.662 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2)
9.665 * * * [progress]: generating series expansions
9.665 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 2 1 1)
9.665 * * * * [progress]: [ 2 / 4 ] generating series at (2 1)
9.665 * * * * [progress]: [ 3 / 4 ] generating series at (2)
9.665 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2)
9.665 * * * [progress]: simplifying candidates
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
9.665 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c)))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
9.666 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (*.p16 (real->posit16 2) a)))>
9.667 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.667 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
9.667 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (*.p16 (real->posit16 2) a)))>
9.667 * * * * [progress]: [ 26 / 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) a))>
9.667 * * * * [progress]: [ 27 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 28 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 29 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 30 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 31 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 32 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 33 / 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)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 34 / 66 ] 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) a) c)))) (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
9.667 * * * * [progress]: [ 35 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
9.667 * * * * [progress]: [ 36 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
9.667 * * * * [progress]: [ 37 / 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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
9.667 * * * * [progress]: [ 38 / 66 ] 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) a) c)))) (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
9.668 * * * * [progress]: [ 39 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
9.668 * * * * [progress]: [ 40 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 41 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 42 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 43 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 44 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 45 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 46 / 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)) (*.p16 (real->posit16 4) a) c)))) a)))>
9.668 * * * * [progress]: [ 47 / 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
9.668 * * * * [progress]: [ 48 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))))>
9.668 * * * * [progress]: [ 49 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
9.668 * * * * [progress]: [ 50 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
9.668 * * * * [progress]: [ 51 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
9.668 * * * * [progress]: [ 52 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
9.668 * * * * [progress]: [ 53 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
9.669 * * * * [progress]: [ 54 / 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
9.669 * * * * [progress]: [ 55 / 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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 56 / 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)) (*.p16 (real->posit16 4) a) c)))))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 57 / 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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 58 / 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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 59 / 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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 60 / 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)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 61 / 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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [progress]: [ 62 / 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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
9.669 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))>
9.671 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)
9.672 * * [simplify]: iteration 0: 43 enodes
9.689 * * [simplify]: iteration 1: 71 enodes
9.728 * * [simplify]: iteration 2: 303 enodes
10.300 * * [simplify]: iteration 3: 1979 enodes
11.187 * * [simplify]: iteration complete: 5073 enodes
11.187 * * [simplify]: Extracting #0: cost 22 inf + 0
11.188 * * [simplify]: Extracting #1: cost 344 inf + 0
11.194 * * [simplify]: Extracting #2: cost 1211 inf + 5
11.214 * * [simplify]: Extracting #3: cost 2022 inf + 22139
11.229 * * [simplify]: Extracting #4: cost 1560 inf + 237796
11.273 * * [simplify]: Extracting #5: cost 940 inf + 566235
11.367 * * [simplify]: Extracting #6: cost 299 inf + 1216326
11.536 * * [simplify]: Extracting #7: cost 1 inf + 1585776
11.728 * * [simplify]: Extracting #8: cost 0 inf + 1586021
11.951 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (real->posit16 2))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 (*.p16 a (real->posit16 2)) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (*.p16 a (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 a (real->posit16 2)))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 a (real->posit16 2)))
  (*.p16 (*.p16 a (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)
  (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)
11.961 * * * [progress]: adding candidates to table
13.317 * * [progress]: iteration 4 / 4
13.317 * * * [progress]: picking best candidate
13.469 * * * * [pick]: Picked  #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.470 * * * [progress]: localizing error
13.904 * * * [progress]: generating rewritten candidates
13.904 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 1 2 1 1)
13.905 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 1)
13.913 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
13.929 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 1 2)
13.935 * * * [progress]: generating series expansions
13.935 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 1 2 1 1)
13.935 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 1)
13.935 * * * * [progress]: [ 3 / 4 ] generating series at (2)
13.935 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 1 2)
13.935 * * * [progress]: simplifying candidates
13.935 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.935 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.936 * * * * [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)) (*.p16 (real->posit16 4) a) c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.937 * * * * [progress]: [ 26 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.937 * * * * [progress]: [ 27 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (real->posit16 0.0))))>
13.937 * * * * [progress]: [ 28 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)))))>
13.938 * * * * [progress]: [ 29 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)))))>
13.938 * * * * [progress]: [ 30 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a)))>
13.938 * * * * [progress]: [ 31 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a)))>
13.938 * * * * [progress]: [ 32 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 1.0)))>
13.938 * * * * [progress]: [ 33 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 34 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 35 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 36 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 37 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 38 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 39 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.938 * * * * [progress]: [ 40 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 41 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 42 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 43 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 45 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 46 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 48 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 49 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 51 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [progress]: [ 52 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.939 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 54 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 55 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 56 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 57 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 58 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 59 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 60 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 61 / 83 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (real->posit16 1.0)) a))>
13.940 * * * * [progress]: [ 62 / 83 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (/.p16 (real->posit16 1.0) a)) (real->posit16 2)))>
13.940 * * * * [progress]: [ 63 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 64 / 83 ] simplifiying candidate #<alt (λ (a b c) (quire16->posit16 (posit16->quire16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))))>
13.940 * * * * [progress]: [ 65 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (real->posit16 0.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.940 * * * * [progress]: [ 66 / 83 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 0.0)))>
13.941 * * * * [progress]: [ 67 / 83 ] simplifiying candidate #<alt (λ (a b c) (-.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 0.0)))>
13.941 * * * * [progress]: [ 68 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a))))>
13.941 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 1.0)))>
13.941 * * * * [progress]: [ 70 / 83 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)) (real->posit16 1.0)))>
13.941 * * * * [progress]: [ 71 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) a) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2))))>
13.941 * * * * [progress]: [ 72 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 73 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 74 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 75 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 76 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 77 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 78 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.941 * * * * [progress]: [ 79 / 83 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.942 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.942 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.942 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.942 * * * * [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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
13.944 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)))
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) 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)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
13.946 * * [simplify]: iteration 0: 48 enodes
13.966 * * [simplify]: iteration 1: 98 enodes
14.016 * * [simplify]: iteration 2: 323 enodes
15.007 * * [simplify]: iteration 3: 1291 enodes
15.980 * * [simplify]: iteration complete: 5001 enodes
15.980 * * [simplify]: Extracting #0: cost 18 inf + 0
15.982 * * [simplify]: Extracting #1: cost 405 inf + 0
15.989 * * [simplify]: Extracting #2: cost 1289 inf + 1377
16.005 * * [simplify]: Extracting #3: cost 2012 inf + 81338
16.041 * * [simplify]: Extracting #4: cost 1725 inf + 333009
16.072 * * [simplify]: Extracting #5: cost 1506 inf + 428778
16.098 * * [simplify]: Extracting #6: cost 1503 inf + 429102
16.145 * * [simplify]: Extracting #7: cost 1501 inf + 430390
16.219 * * [simplify]: Extracting #8: cost 1179 inf + 801917
16.366 * * [simplify]: Extracting #9: cost 410 inf + 1782248
16.572 * * [simplify]: Extracting #10: cost 56 inf + 2411249
16.841 * * [simplify]: Extracting #11: cost 0 inf + 2528676
17.071 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))
  (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) c))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 0.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (real->posit16 0.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a))
  (/.p16 (real->posit16 1.0) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) c)))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) 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)) (*.p16 a (real->posit16 4)) c)))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
17.079 * * * [progress]: adding candidates to table
18.965 * [progress]: [Phase 3 of 3] Extracting.
18.965 * * [regime]: Finding splitpoints for: (#<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (*.p16 (real->posit16 4) a) c) (*.p16 (*.p16 (real->posit16 4) a) c))) (+.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)))> #<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)) (*.p16 (real->posit16 4) a) c)))))))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a))))>)
18.971 * * * [regime-changes]: Trying 3 branch expressions: (c b a)
18.971 * * * * [regimes]: Trying to branch on c from (#<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (*.p16 (real->posit16 4) a) c) (*.p16 (*.p16 (real->posit16 4) a) c))) (+.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)))> #<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)) (*.p16 (real->posit16 4) a) c)))))))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a))))>)
19.257 * * * * [regimes]: Trying to branch on b from (#<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (*.p16 (real->posit16 4) a) c) (*.p16 (*.p16 (real->posit16 4) a) c))) (+.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)))> #<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)) (*.p16 (real->posit16 4) a) c)))))))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a))))>)
19.501 * * * * [regimes]: Trying to branch on a from (#<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))))> #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (/.p16 (-.p16 (*.p16 (*.p16 b b) (*.p16 b b)) (*.p16 (*.p16 (*.p16 (real->posit16 4) a) c) (*.p16 (*.p16 (real->posit16 4) a) c))) (+.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)) (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))> #<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)))> #<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)) (*.p16 (real->posit16 4) a) c)))))))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a))))>)
19.737 * * * [regime]: Found split indices: #<option (#s(si 6 256))>
19.738 * [simplify]: Simplifying:
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a)))
19.738 * * [simplify]: iteration 0: 21 enodes
19.740 * * [simplify]: iteration complete: 21 enodes
19.740 * * [simplify]: Extracting #0: cost 1 inf + 0
19.740 * * [simplify]: Extracting #1: cost 3 inf + 0
19.740 * * [simplify]: Extracting #2: cost 6 inf + 0
19.740 * * [simplify]: Extracting #3: cost 11 inf + 0
19.740 * * [simplify]: Extracting #4: cost 11 inf + 3
19.740 * * [simplify]: Extracting #5: cost 10 inf + 5
19.740 * * [simplify]: Extracting #6: cost 10 inf + 409
19.740 * * [simplify]: Extracting #7: cost 10 inf + 1173
19.740 * * [simplify]: Extracting #8: cost 9 inf + 1815
19.741 * * [simplify]: Extracting #9: cost 5 inf + 2783
19.741 * * [simplify]: Extracting #10: cost 3 inf + 4111
19.741 * * [simplify]: Extracting #11: cost 1 inf + 6240
19.741 * * [simplify]: Extracting #12: cost 0 inf + 8606
19.742 * [simplify]: Simplified to:
  (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 2) a)))
19.742 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
19.776 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
19.779 * * * * [points]: Setting MPFR precision to 64
19.781 * * * * [points]: Setting MPFR precision to 320
19.782 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
19.784 * * * * [points]: Setting MPFR precision to 64
19.787 * * * * [points]: Setting MPFR precision to 320
19.789 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
19.792 * * * * [points]: Setting MPFR precision to 64
19.796 * * * * [points]: Setting MPFR precision to 320
19.801 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
19.803 * * * * [points]: Setting MPFR precision to 64
19.813 * * * * [points]: Setting MPFR precision to 320
19.822 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
19.839 * * * * [points]: Setting MPFR precision to 64
19.859 * * * * [points]: Setting MPFR precision to 320
19.877 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
19.880 * * * * [points]: Setting MPFR precision to 64
19.923 * * * * [points]: Setting MPFR precision to 320
19.960 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
19.962 * * * * [points]: Setting MPFR precision to 64
20.079 * * * * [points]: Setting MPFR precision to 320
20.218 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
20.223 * * * * [points]: Setting MPFR precision to 64
20.448 * * * * [points]: Setting MPFR precision to 320
20.698 * * * * [points]: Computing exacts for 8000 points
20.701 * * * * [points]: Setting MPFR precision to 64
22.223 * * * * [points]: Setting MPFR precision to 320
23.189 * * * * [points]: Filtering points with unrepresentable outputs
23.241 * * * * [points]: Sampled 8000 points with exact outputs
32.410 * [regime-testing]: Baseline error score: 1.5976236630954659
32.413 * [regime-testing]: Oracle error score: 1.1018689822554166
32.423 * [regime-testing]: End program error score: 1.5976236630954659