0.725 * [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.011 * * * * [points]: Computing exacts on every 16 of 256 points to ramp up precision
0.074 * * * * [points]: Setting MPFR precision to 64
0.077 * * * * [points]: Setting MPFR precision to 320
0.082 * * * * [points]: Computing exacts on every 8 of 256 points to ramp up precision
0.087 * * * * [points]: Setting MPFR precision to 64
0.092 * * * * [points]: Setting MPFR precision to 320
0.094 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.097 * * * * [points]: Setting MPFR precision to 64
0.100 * * * * [points]: Setting MPFR precision to 320
0.104 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.107 * * * * [points]: Setting MPFR precision to 64
0.113 * * * * [points]: Setting MPFR precision to 320
0.118 * * * * [points]: Computing exacts for 256 points
0.122 * * * * [points]: Setting MPFR precision to 64
0.151 * * * * [points]: Setting MPFR precision to 320
0.661 * * * * [points]: Filtering points with unrepresentable outputs
0.663 * * * * [points]: Sampled 256 points with exact outputs
0.664 * * * [progress]: [2/2] Setting up program.
0.687 * [progress]: [Phase 2 of 3] Improving.
0.688 * * * * [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.690 * [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.691 * * [simplify]: iteration 0: 16 enodes
0.698 * * [simplify]: iteration 1: 27 enodes
0.704 * * [simplify]: iteration 2: 35 enodes
0.710 * * [simplify]: iteration 3: 37 enodes
0.716 * * [simplify]: iteration complete: 37 enodes
0.716 * * [simplify]: Extracting #0: cost 1 inf + 0
0.716 * * [simplify]: Extracting #1: cost 5 inf + 0
0.716 * * [simplify]: Extracting #2: cost 9 inf + 1
0.717 * * [simplify]: Extracting #3: cost 10 inf + 2
0.717 * * [simplify]: Extracting #4: cost 9 inf + 407
0.717 * * [simplify]: Extracting #5: cost 13 inf + 728
0.717 * * [simplify]: Extracting #6: cost 12 inf + 1051
0.717 * * [simplify]: Extracting #7: cost 11 inf + 1052
0.717 * * [simplify]: Extracting #8: cost 5 inf + 4107
0.717 * * [simplify]: Extracting #9: cost 1 inf + 9604
0.718 * * [simplify]: Extracting #10: cost 0 inf + 11289
0.718 * [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.720 * * [progress]: iteration 1 / 4
0.720 * * * [progress]: picking best candidate
0.738 * * * * [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.738 * * * [progress]: localizing error
0.949 * * * [progress]: generating rewritten candidates
0.949 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
0.953 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 2)
0.954 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
0.957 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1 2)
0.963 * * * [progress]: generating series expansions
0.963 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
0.963 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 2)
0.964 * * * * [progress]: [ 3 / 4 ] generating series at (2)
0.964 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1 2)
0.964 * * * [progress]: simplifying candidates
0.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.964 * * * * [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.965 * * * * [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.965 * * * * [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.965 * * * * [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.965 * * * * [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.965 * * * * [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.965 * * * * [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.965 * * * * [progress]: [ 26 / 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.965 * * * * [progress]: [ 27 / 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.965 * * * * [progress]: [ 28 / 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.965 * * * * [progress]: [ 29 / 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.965 * * * * [progress]: [ 30 / 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.965 * * * * [progress]: [ 31 / 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.965 * * * * [progress]: [ 32 / 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.965 * * * * [progress]: [ 33 / 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.965 * * * * [progress]: [ 34 / 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.965 * * * * [progress]: [ 35 / 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.965 * * * * [progress]: [ 36 / 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.965 * * * * [progress]: [ 37 / 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.965 * * * * [progress]: [ 38 / 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.965 * * * * [progress]: [ 39 / 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.965 * * * * [progress]: [ 40 / 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.965 * * * * [progress]: [ 41 / 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.965 * * * * [progress]: [ 42 / 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.965 * * * * [progress]: [ 43 / 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.965 * * * * [progress]: [ 44 / 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.965 * * * * [progress]: [ 45 / 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.965 * * * * [progress]: [ 46 / 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.965 * * * * [progress]: [ 47 / 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.966 * * * * [progress]: [ 48 / 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.966 * * * * [progress]: [ 49 / 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.966 * * * * [progress]: [ 50 / 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.966 * * * * [progress]: [ 51 / 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.966 * * * * [progress]: [ 52 / 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.966 * * * * [progress]: [ 53 / 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.966 * * * * [progress]: [ 54 / 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.966 * * * * [progress]: [ 55 / 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.966 * * * * [progress]: [ 56 / 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.966 * * * * [progress]: [ 57 / 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.966 * * * * [progress]: [ 58 / 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.966 * * * * [progress]: [ 59 / 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.966 * * * * [progress]: [ 60 / 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.966 * * * * [progress]: [ 61 / 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.966 * * * * [progress]: [ 62 / 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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.966 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.967 * * * * [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.968 * [simplify]: Simplifying:
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (real->posit16 0.0))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (+.p16 (real->posit16 0.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a))
  (*.p16 (*.p16 (real->posit16 2) a) (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))))
  (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (*.p16 (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.968 * * [simplify]: iteration 0: 48 enodes
0.979 * * [simplify]: iteration 1: 89 enodes
1.013 * * [simplify]: iteration 2: 352 enodes
1.568 * * [simplify]: iteration 3: 2150 enodes
2.324 * * [simplify]: iteration complete: 5012 enodes
2.324 * * [simplify]: Extracting #0: cost 25 inf + 0
2.325 * * [simplify]: Extracting #1: cost 314 inf + 0
2.328 * * [simplify]: Extracting #2: cost 965 inf + 327
2.339 * * [simplify]: Extracting #3: cost 2180 inf + 26689
2.376 * * [simplify]: Extracting #4: cost 1001 inf + 721288
2.519 * * [simplify]: Extracting #5: cost 137 inf + 1700991
2.635 * * [simplify]: Extracting #6: cost 0 inf + 1859382
2.765 * [simplify]: Simplified to:
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (neg.p16 b)
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))
  (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (neg.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (*.p16 (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))))
  (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))) b)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))) (real->posit16 1.0))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (real->posit16 2))
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))))) a)
  (*.p16 (real->posit16 2) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (*.p16 (*.p16 a (-.p16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4)))) b)) (real->posit16 2))
  (*.p16 (real->posit16 2) a)
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) a)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (real->posit16 2))
  (/.p16 (real->posit16 1.0) a)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 0.0)
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 (*.p16 a c) (real->posit16 4))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 (*.p16 a c) (real->posit16 4))
  (real->posit16 0.0)
  (*.p16 (real->posit16 4) a)
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 c a)
  (*.p16 (*.p16 a c) (real->posit16 4))
  (*.p16 (*.p16 a c) (real->posit16 4))
  (real->posit16 1.0)
  (posit16->quire16 (*.p16 (*.p16 a c) (real->posit16 4)))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (*.p16 a c) (real->posit16 4))))) (*.p16 (real->posit16 2) a))
2.776 * * * [progress]: adding candidates to table
4.087 * * [progress]: iteration 2 / 4
4.087 * * * [progress]: picking best candidate
4.219 * * * * [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.219 * * * [progress]: localizing error
4.455 * * * [progress]: generating rewritten candidates
4.455 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1)
4.460 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1 2)
4.461 * * * * [progress]: [ 3 / 4 ] rewriting at (2)
4.473 * * * * [progress]: [ 4 / 4 ] rewriting at (2 1 2 1)
4.479 * * * [progress]: generating series expansions
4.479 * * * * [progress]: [ 1 / 4 ] generating series at (2 1)
4.479 * * * * [progress]: [ 2 / 4 ] generating series at (2 1 2)
4.479 * * * * [progress]: [ 3 / 4 ] generating series at (2)
4.479 * * * * [progress]: [ 4 / 4 ] generating series at (2 1 2 1)
4.479 * * * [progress]: simplifying candidates
4.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.479 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [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.480 * * * * [progress]: [ 26 / 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.480 * * * * [progress]: [ 27 / 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.480 * * * * [progress]: [ 28 / 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.480 * * * * [progress]: [ 29 / 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.480 * * * * [progress]: [ 30 / 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.480 * * * * [progress]: [ 31 / 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.480 * * * * [progress]: [ 32 / 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.480 * * * * [progress]: [ 33 / 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.480 * * * * [progress]: [ 34 / 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.480 * * * * [progress]: [ 35 / 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.480 * * * * [progress]: [ 36 / 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.480 * * * * [progress]: [ 37 / 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.480 * * * * [progress]: [ 38 / 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.481 * * * * [progress]: [ 39 / 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.481 * * * * [progress]: [ 40 / 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.481 * * * * [progress]: [ 41 / 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.481 * * * * [progress]: [ 42 / 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.481 * * * * [progress]: [ 43 / 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.481 * * * * [progress]: [ 44 / 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.481 * * * * [progress]: [ 45 / 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.481 * * * * [progress]: [ 46 / 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.481 * * * * [progress]: [ 47 / 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.481 * * * * [progress]: [ 48 / 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.481 * * * * [progress]: [ 49 / 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.481 * * * * [progress]: [ 50 / 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.481 * * * * [progress]: [ 51 / 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.481 * * * * [progress]: [ 52 / 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.481 * * * * [progress]: [ 53 / 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.481 * * * * [progress]: [ 54 / 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.481 * * * * [progress]: [ 55 / 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.481 * * * * [progress]: [ 56 / 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.481 * * * * [progress]: [ 57 / 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.481 * * * * [progress]: [ 58 / 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.481 * * * * [progress]: [ 59 / 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.481 * * * * [progress]: [ 60 / 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.481 * * * * [progress]: [ 61 / 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.481 * * * * [progress]: [ 62 / 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.481 * * * * [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.481 * * * * [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.481 * * * * [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.481 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.482 * * * * [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.483 * [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)
  (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 (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)
  (-.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 (real->posit16 4) a)
  (*.p16 (real->posit16 4) a)
  (*.p16 (real->posit16 4) a)
  (*.p16 (real->posit16 4) a)
4.484 * * [simplify]: iteration 0: 54 enodes
4.498 * * [simplify]: iteration 1: 102 enodes
4.550 * * [simplify]: iteration 2: 410 enodes
5.123 * * [simplify]: iteration 3: 2512 enodes
6.232 * * [simplify]: iteration complete: 5005 enodes
6.232 * * [simplify]: Extracting #0: cost 31 inf + 0
6.233 * * [simplify]: Extracting #1: cost 488 inf + 0
6.236 * * [simplify]: Extracting #2: cost 1125 inf + 969
6.242 * * [simplify]: Extracting #3: cost 1827 inf + 52711
6.265 * * [simplify]: Extracting #4: cost 1122 inf + 421820
6.302 * * [simplify]: Extracting #5: cost 588 inf + 874942
6.372 * * [simplify]: Extracting #6: cost 296 inf + 1283490
6.468 * * [simplify]: Extracting #7: cost 12 inf + 1747102
6.584 * * [simplify]: Extracting #8: cost 0 inf + 1768206
6.720 * [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)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2))
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.p16 (/.p16 (real->posit16 2) (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c)))))) a)
  (*.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)
  (*.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 (real->posit16 4) a)
  (*.p16 (real->posit16 4) a)
  (*.p16 (real->posit16 4) a)
  (*.p16 (real->posit16 4) a)
6.725 * * * [progress]: adding candidates to table
8.202 * * [progress]: iteration 3 / 4
8.203 * * * [progress]: picking best candidate
8.421 * * * * [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)))>
8.421 * * * [progress]: localizing error
8.725 * * * [progress]: generating rewritten candidates
8.725 * * * * [progress]: [ 1 / 4 ] rewriting at (2 1 2 1 1)
8.726 * * * * [progress]: [ 2 / 4 ] rewriting at (2 1)
8.731 * * * * [progress]: [ 3 / 4 ] rewriting at (2 1 2)
8.732 * * * * [progress]: [ 4 / 4 ] rewriting at (2)
8.741 * * * [progress]: generating series expansions
8.741 * * * * [progress]: [ 1 / 4 ] generating series at (2 1 2 1 1)
8.741 * * * * [progress]: [ 2 / 4 ] generating series at (2 1)
8.742 * * * * [progress]: [ 3 / 4 ] generating series at (2 1 2)
8.742 * * * * [progress]: [ 4 / 4 ] generating series at (2)
8.742 * * * [progress]: simplifying candidates
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.742 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.743 * * * * [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)))>
8.744 * * * * [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)))>
8.744 * * * * [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)))>
8.744 * * * * [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)))>
8.744 * * * * [progress]: [ 26 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 27 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 28 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 29 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 30 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 31 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 32 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 33 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) (*.p16 (real->posit16 2) a)))>
8.744 * * * * [progress]: [ 34 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) a))>
8.744 * * * * [progress]: [ 35 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.744 * * * * [progress]: [ 36 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.744 * * * * [progress]: [ 37 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.745 * * * * [progress]: [ 38 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.745 * * * * [progress]: [ 39 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.745 * * * * [progress]: [ 40 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.745 * * * * [progress]: [ 41 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (real->posit16 1.0) (/.p16 (*.p16 (real->posit16 2) a) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))))>
8.745 * * * * [progress]: [ 42 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (/.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
8.745 * * * * [progress]: [ 43 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
8.745 * * * * [progress]: [ 44 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
8.745 * * * * [progress]: [ 45 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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)))))))>
8.745 * * * * [progress]: [ 46 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (*.p16 (real->posit16 2) a) (real->posit16 1.0))))>
8.745 * * * * [progress]: [ 47 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
8.745 * * * * [progress]: [ 48 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.745 * * * * [progress]: [ 49 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.745 * * * * [progress]: [ 50 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.745 * * * * [progress]: [ 51 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.745 * * * * [progress]: [ 52 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.746 * * * * [progress]: [ 53 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.746 * * * * [progress]: [ 54 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
8.746 * * * * [progress]: [ 55 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))>
8.746 * * * * [progress]: [ 56 / 66 ] simplifiying candidate #<alt (λ (a b c) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)))))>
8.746 * * * * [progress]: [ 57 / 66 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
8.746 * * * * [progress]: [ 58 / 66 ] simplifiying candidate #<alt (λ (a b c) (+.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
8.746 * * * * [progress]: [ 59 / 66 ] simplifiying candidate #<alt (λ (a b c) (-.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 0.0)))>
8.746 * * * * [progress]: [ 60 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a))))>
8.746 * * * * [progress]: [ 61 / 66 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
8.746 * * * * [progress]: [ 62 / 66 ] simplifiying candidate #<alt (λ (a b c) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 (real->posit16 2) a)) (real->posit16 1.0)))>
8.746 * * * * [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)))>
8.746 * * * * [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)))>
8.746 * * * * [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)))>
8.746 * * * * [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)))>
8.748 * [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)
  (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 (*.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)
  (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)
8.749 * * [simplify]: iteration 0: 43 enodes
8.780 * * [simplify]: iteration 1: 71 enodes
8.819 * * [simplify]: iteration 2: 303 enodes
9.449 * * [simplify]: iteration 3: 1964 enodes
10.280 * * [simplify]: iteration complete: 5068 enodes
10.281 * * [simplify]: Extracting #0: cost 22 inf + 0
10.282 * * [simplify]: Extracting #1: cost 249 inf + 0
10.286 * * [simplify]: Extracting #2: cost 1056 inf + 251
10.297 * * [simplify]: Extracting #3: cost 1925 inf + 38211
10.350 * * [simplify]: Extracting #4: cost 1045 inf + 492108
10.425 * * [simplify]: Extracting #5: cost 725 inf + 660932
10.559 * * [simplify]: Extracting #6: cost 215 inf + 1232457
10.743 * * [simplify]: Extracting #7: cost 2 inf + 1489565
10.909 * * [simplify]: Extracting #8: cost 0 inf + 1490856
11.033 * [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 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 (/.p16 (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))))) a)
  (*.p16 (/.p16 (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))))) a)
  (*.p16 (/.p16 (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))))) a)
  (*.p16 (/.p16 (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))))) a)
  (*.p16 (/.p16 (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))))) a)
  (*.p16 (/.p16 (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))))) a)
  (*.p16 (/.p16 (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))))) a)
  (*.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 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) 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 (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)
  (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.037 * * * [progress]: adding candidates to table
12.344 * * [progress]: iteration 4 / 4
12.344 * * * [progress]: picking best candidate
12.594 * * * * [pick]: Picked  #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
12.594 * * * [progress]: localizing error
12.969 * * * [progress]: generating rewritten candidates
12.969 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 1 1)
12.970 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1)
12.974 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2)
12.975 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2)
12.993 * * * [progress]: generating series expansions
12.993 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 1 1)
12.993 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1)
12.993 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2)
12.993 * * * * [progress]: [ 4 / 4 ] generating series at (2 2)
12.993 * * * [progress]: simplifying candidates
12.993 * * * * [progress]: [ 1 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.993 * * * * [progress]: [ 2 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.993 * * * * [progress]: [ 3 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.993 * * * * [progress]: [ 4 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.993 * * * * [progress]: [ 5 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.993 * * * * [progress]: [ 6 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (-.p16 (neg.p16 b) (real->posit16 0.0)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
12.993 * * * * [progress]: [ 7 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) a)))>
12.993 * * * * [progress]: [ 8 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 9 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (neg.p16 b) (-.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 10 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 11 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) a)))>
12.994 * * * * [progress]: [ 12 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (neg.p16 b) (neg.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 13 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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))))) a)))>
12.994 * * * * [progress]: [ 14 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 15 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))) a)))>
12.994 * * * * [progress]: [ 16 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) a)))>
12.994 * * * * [progress]: [ 17 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 18 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 19 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (neg.p16 b)) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) a)))>
12.994 * * * * [progress]: [ 20 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.994 * * * * [progress]: [ 21 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (+.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) a)))>
12.994 * * * * [progress]: [ 22 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 0.0)) a)))>
12.994 * * * * [progress]: [ 23 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.995 * * * * [progress]: [ 24 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (*.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) a)))>
12.995 * * * * [progress]: [ 25 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (real->posit16 1.0)) a)))>
12.995 * * * * [progress]: [ 26 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.995 * * * * [progress]: [ 27 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))) a)))>
12.995 * * * * [progress]: [ 28 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.995 * * * * [progress]: [ 29 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) a)))>
12.995 * * * * [progress]: [ 30 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 0.0))) a)))>
12.995 * * * * [progress]: [ 31 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))) a)))>
12.995 * * * * [progress]: [ 32 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) a)))>
12.995 * * * * [progress]: [ 33 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))) (real->posit16 1.0))) a)))>
12.995 * * * * [progress]: [ 34 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.995 * * * * [progress]: [ 35 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.995 * * * * [progress]: [ 36 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.995 * * * * [progress]: [ 37 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.995 * * * * [progress]: [ 38 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.995 * * * * [progress]: [ 39 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.996 * * * * [progress]: [ 40 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.996 * * * * [progress]: [ 41 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (/.p16 a (real->posit16 1.0)))))>
12.996 * * * * [progress]: [ 42 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))>
12.996 * * * * [progress]: [ 43 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) (*.p16 a (real->posit16 1.0)))))>
12.996 * * * * [progress]: [ 44 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a))))>
12.996 * * * * [progress]: [ 45 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))))>
12.996 * * * * [progress]: [ 46 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a))))>
12.996 * * * * [progress]: [ 47 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (+.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a) (real->posit16 0.0))))>
12.996 * * * * [progress]: [ 48 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (-.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a) (real->posit16 0.0))))>
12.996 * * * * [progress]: [ 49 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a))))>
12.996 * * * * [progress]: [ 50 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (*.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a) (real->posit16 1.0))))>
12.996 * * * * [progress]: [ 51 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a) (real->posit16 1.0))))>
12.996 * * * * [progress]: [ 52 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
12.996 * * * * [progress]: [ 53 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
12.996 * * * * [progress]: [ 54 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
12.997 * * * * [progress]: [ 55 / 55 ] simplifiying candidate #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>
12.998 * [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)
  (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 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (/.p16 a (real->posit16 1.0))
  (*.p16 a (+.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))))
  (*.p16 a (real->posit16 1.0))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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)
12.999 * * [simplify]: iteration 0: 39 enodes
13.011 * * [simplify]: iteration 1: 59 enodes
13.022 * * [simplify]: iteration 2: 181 enodes
13.222 * * [simplify]: iteration 3: 1060 enodes
13.708 * * [simplify]: iteration complete: 5000 enodes
13.708 * * [simplify]: Extracting #0: cost 18 inf + 0
13.709 * * [simplify]: Extracting #1: cost 229 inf + 1
13.711 * * [simplify]: Extracting #2: cost 926 inf + 1416
13.719 * * [simplify]: Extracting #3: cost 2346 inf + 75001
13.751 * * [simplify]: Extracting #4: cost 1275 inf + 571928
13.822 * * [simplify]: Extracting #5: cost 1169 inf + 632080
13.888 * * [simplify]: Extracting #6: cost 1166 inf + 632404
13.959 * * [simplify]: Extracting #7: cost 1164 inf + 633692
14.026 * * [simplify]: Extracting #8: cost 700 inf + 1159437
14.160 * * [simplify]: Extracting #9: cost 83 inf + 1887323
14.342 * * [simplify]: Extracting #10: cost 0 inf + 1990044
14.552 * [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 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 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))))
  a
  (*.p16 a (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c))) b))
  a
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 a (real->posit16 4)) c)))) a))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 2))
  (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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)
14.561 * * * [progress]: adding candidates to table
15.967 * [progress]: [Phase 3 of 3] Extracting.
15.967 * * [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 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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))))) 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 (*.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 (*.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 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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>)
15.971 * * * [regime-changes]: Trying 3 branch expressions: (c b a)
15.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 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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))))) 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 (*.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 (*.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 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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>)
16.334 * * * * [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 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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))))) 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 (*.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 (*.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 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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>)
17.003 * * * * [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 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (real->posit16 2)) (/.p16 (real->posit16 1.0) a)))> #<alt (λ (a b c) (*.p16 (/.p16 (-.p16 (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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (/.p16 (-.p16 (*.p16 (neg.p16 b) (neg.p16 b)) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.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))))) 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 (*.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 (*.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 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 (real->posit16 1.0) (real->posit16 2)) (/.p16 (real->posit16 1.0) (/.p16 a (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c))))))))> #<alt (λ (a b c) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a)))>)
17.350 * * * [regime]: Found split indices: #<option (#s(si 8 256))>
17.351 * [simplify]: Simplifying:
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a))
17.351 * * [simplify]: iteration 0: 20 enodes
17.354 * * [simplify]: iteration complete: 20 enodes
17.354 * * [simplify]: Extracting #0: cost 1 inf + 0
17.354 * * [simplify]: Extracting #1: cost 3 inf + 0
17.354 * * [simplify]: Extracting #2: cost 7 inf + 0
17.355 * * [simplify]: Extracting #3: cost 10 inf + 1
17.355 * * [simplify]: Extracting #4: cost 10 inf + 3
17.355 * * [simplify]: Extracting #5: cost 8 inf + 6
17.355 * * [simplify]: Extracting #6: cost 9 inf + 529
17.355 * * [simplify]: Extracting #7: cost 10 inf + 530
17.355 * * [simplify]: Extracting #8: cost 10 inf + 851
17.355 * * [simplify]: Extracting #9: cost 8 inf + 1173
17.355 * * [simplify]: Extracting #10: cost 4 inf + 2784
17.356 * * [simplify]: Extracting #11: cost 3 inf + 3468
17.356 * * [simplify]: Extracting #12: cost 1 inf + 5596
17.357 * * [simplify]: Extracting #13: cost 0 inf + 7642
17.357 * [simplify]: Simplified to:
  (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 2)) (/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 b b)) (*.p16 (real->posit16 4) a) c)))) a))
17.357 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
17.414 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
17.420 * * * * [points]: Setting MPFR precision to 64
17.442 * * * * [points]: Setting MPFR precision to 320
17.444 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
17.449 * * * * [points]: Setting MPFR precision to 64
17.454 * * * * [points]: Setting MPFR precision to 320
17.457 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
17.462 * * * * [points]: Setting MPFR precision to 64
17.469 * * * * [points]: Setting MPFR precision to 320
17.476 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
17.481 * * * * [points]: Setting MPFR precision to 64
17.495 * * * * [points]: Setting MPFR precision to 320
17.510 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
17.515 * * * * [points]: Setting MPFR precision to 64
17.540 * * * * [points]: Setting MPFR precision to 320
17.569 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
17.574 * * * * [points]: Setting MPFR precision to 64
17.666 * * * * [points]: Setting MPFR precision to 320
17.726 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
17.731 * * * * [points]: Setting MPFR precision to 64
17.854 * * * * [points]: Setting MPFR precision to 320
18.049 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
18.055 * * * * [points]: Setting MPFR precision to 64
18.317 * * * * [points]: Setting MPFR precision to 320
18.601 * * * * [points]: Computing exacts for 8000 points
18.671 * * * * [points]: Setting MPFR precision to 64
19.862 * * * * [points]: Setting MPFR precision to 320
21.121 * * * * [points]: Filtering points with unrepresentable outputs
21.140 * * * * [points]: Sampled 8000 points with exact outputs
32.659 * [regime-testing]: Baseline error score: 1.5108533658220198
32.661 * [regime-testing]: Oracle error score: 1.0705428931309897
32.672 * [regime-testing]: End program error score: 1.5108533658220198