23.857 * [progress]: [Phase 1 of 3] Setting up.
0.003 * * * [progress]: [1/2] Preparing points
0.003 * * * * [points]: Sampling 256 additional inputs, on iter 0 have 0 / 256
0.004 * * * * [points]: Computing exacts on every 16 of 256 points to ramp up precision
0.010 * * * * [points]: Setting MPFR precision to 64
0.011 * * * * [points]: Setting MPFR precision to 320
0.013 * * * * [points]: Computing exacts on every 8 of 256 points to ramp up precision
0.017 * * * * [points]: Setting MPFR precision to 64
0.020 * * * * [points]: Setting MPFR precision to 320
0.024 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.028 * * * * [points]: Setting MPFR precision to 64
0.034 * * * * [points]: Setting MPFR precision to 320
0.039 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.043 * * * * [points]: Setting MPFR precision to 64
0.052 * * * * [points]: Setting MPFR precision to 320
0.061 * * * * [points]: Computing exacts for 256 points
0.065 * * * * [points]: Setting MPFR precision to 64
0.092 * * * * [points]: Setting MPFR precision to 320
0.116 * * * * [points]: Filtering points with unrepresentable outputs
0.117 * * * * [points]: Sampled 256 points with exact outputs
0.117 * * * [progress]: [2/2] Setting up program.
0.141 * [progress]: [Phase 2 of 3] Improving.
0.141 * * * * [progress]: [ 1 / 1 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))>
0.142 * [simplify]: Simplifying:
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))
0.142 * * [simplify]: iteration 0: 14 enodes
0.169 * * [simplify]: iteration 1: 19 enodes
0.177 * * [simplify]: iteration 2: 26 enodes
0.189 * * [simplify]: iteration 3: 28 enodes
0.198 * * [simplify]: iteration complete: 28 enodes
0.198 * * [simplify]: Extracting #0: cost 1 inf + 0
0.198 * * [simplify]: Extracting #1: cost 3 inf + 0
0.198 * * [simplify]: Extracting #2: cost 5 inf + 0
0.198 * * [simplify]: Extracting #3: cost 8 inf + 1
0.198 * * [simplify]: Extracting #4: cost 11 inf + 2
0.199 * * [simplify]: Extracting #5: cost 8 inf + 86
0.199 * * [simplify]: Extracting #6: cost 9 inf + 488
0.199 * * [simplify]: Extracting #7: cost 9 inf + 809
0.199 * * [simplify]: Extracting #8: cost 7 inf + 1131
0.199 * * [simplify]: Extracting #9: cost 5 inf + 2535
0.200 * * [simplify]: Extracting #10: cost 2 inf + 5503
0.200 * * [simplify]: Extracting #11: cost 0 inf + 8150
0.201 * [simplify]: Simplified to:
  (*.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 0.5))
0.202 * * [progress]: iteration 1 / 4
0.202 * * * [progress]: picking best candidate
0.226 * * * * [pick]: Picked  #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))>
0.226 * * * [progress]: localizing error
0.560 * * * [progress]: generating rewritten candidates
0.560 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2)
0.565 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2 1)
0.565 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2)
0.566 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2 1 2 1 1)
0.574 * * * [progress]: generating series expansions
0.575 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2)
0.575 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2 1)
0.575 * * * * [progress]: [ 3 / 4 ] generating series at (2 2)
0.575 * * * * [progress]: [ 4 / 4 ] generating series at (2 2 1 2 1 1)
0.575 * * * [progress]: simplifying candidates
0.575 * * * * [progress]: [ 1 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (real->posit16 0.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.575 * * * * [progress]: [ 2 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (-.p16 (real->posit16 0.0) re))))))>
0.575 * * * * [progress]: [ 3 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (+.p16 (real->posit16 0.0) re))))))>
0.575 * * * * [progress]: [ 4 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (neg.p16 re))))))>
0.575 * * * * [progress]: [ 5 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.575 * * * * [progress]: [ 6 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.575 * * * * [progress]: [ 7 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (quire16->posit16 (posit16->quire16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
0.575 * * * * [progress]: [ 8 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re (real->posit16 1.0)))))))>
0.575 * * * * [progress]: [ 9 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (real->posit16 0.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.575 * * * * [progress]: [ 10 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 0.0))))))>
0.576 * * * * [progress]: [ 11 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 0.0))))))>
0.576 * * * * [progress]: [ 12 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.576 * * * * [progress]: [ 13 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0))))))>
0.576 * * * * [progress]: [ 14 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0))))))>
0.576 * * * * [progress]: [ 15 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (*.p16 (real->posit16 1.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.576 * * * * [progress]: [ 16 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (quire16->posit16 (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) re)))))>
0.576 * * * * [progress]: [ 17 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (+.p16 (real->posit16 0.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.576 * * * * [progress]: [ 18 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 0.0)) re)))))>
0.576 * * * * [progress]: [ 19 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 0.0)) re)))))>
0.576 * * * * [progress]: [ 20 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (*.p16 (real->posit16 1.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.576 * * * * [progress]: [ 21 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 1.0)) re)))))>
0.576 * * * * [progress]: [ 22 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (/.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 1.0)) re)))))>
0.576 * * * * [progress]: [ 23 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (real->posit16 1.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.576 * * * * [progress]: [ 24 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (quire16->posit16 (posit16->quire16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
0.576 * * * * [progress]: [ 25 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (+.p16 (real->posit16 0.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.577 * * * * [progress]: [ 26 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (+.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))) (real->posit16 0.0))))>
0.577 * * * * [progress]: [ 27 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (-.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))) (real->posit16 0.0))))>
0.577 * * * * [progress]: [ 28 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (real->posit16 1.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
0.577 * * * * [progress]: [ 29 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))) (real->posit16 1.0))))>
0.577 * * * * [progress]: [ 30 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (/.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))) (real->posit16 1.0))))>
0.577 * * * * [progress]: [ 31 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (+.p16 (*.p16 re re) (real->posit16 0.0)) (*.p16 im im))) re)))))>
0.577 * * * * [progress]: [ 32 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (+.p16 (*.p16 re re) (*.p16 im im)) (real->posit16 0.0))) re)))))>
0.577 * * * * [progress]: [ 33 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (real->posit16 0.0) (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.577 * * * * [progress]: [ 34 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (+.p16 (real->posit16 0.0) (*.p16 im im)))) re)))))>
0.577 * * * * [progress]: [ 35 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (-.p16 (+.p16 (*.p16 re re) (*.p16 im im)) (real->posit16 0.0))) re)))))>
0.577 * * * * [progress]: [ 36 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (-.p16 (*.p16 re re) (-.p16 (real->posit16 0.0) (*.p16 im im)))) re)))))>
0.577 * * * * [progress]: [ 37 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (*.p16 (real->posit16 1.0) (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.577 * * * * [progress]: [ 38 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (posit16->quire16 (+.p16 (*.p16 re re) (*.p16 im im))))) re)))))>
0.577 * * * * [progress]: [ 39 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) (*.p16 im im) (real->posit16 1.0)))) re)))))>
0.577 * * * * [progress]: [ 40 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))>
0.577 * * * * [progress]: [ 41 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (real->posit16 0.0) (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.578 * * * * [progress]: [ 42 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (+.p16 (*.p16 re re) (*.p16 im im)) (real->posit16 0.0))) re)))))>
0.578 * * * * [progress]: [ 43 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (-.p16 (+.p16 (*.p16 re re) (*.p16 im im)) (real->posit16 0.0))) re)))))>
0.578 * * * * [progress]: [ 44 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (*.p16 (real->posit16 1.0) (+.p16 (*.p16 re re) (*.p16 im im)))) re)))))>
0.578 * * * * [progress]: [ 45 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (*.p16 (+.p16 (*.p16 re re) (*.p16 im im)) (real->posit16 1.0))) re)))))>
0.578 * * * * [progress]: [ 46 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (/.p16 (+.p16 (*.p16 re re) (*.p16 im im)) (real->posit16 1.0))) re)))))>
0.578 * * * * [progress]: [ 47 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))>
0.578 * * * * [progress]: [ 48 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))>
0.578 * * * * [progress]: [ 49 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))>
0.578 * * * * [progress]: [ 50 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))>
0.578 * * * * [progress]: [ 51 / 51 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))>
0.579 * [simplify]: Simplifying:
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (real->posit16 0.0) re)
  (+.p16 (real->posit16 0.0) re)
  (neg.p16 re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (quire16-mul-sub (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re (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 re re) (*.p16 im im))))
  (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 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))
  (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 re re) (real->posit16 0.0))
  (+.p16 (*.p16 re re) (*.p16 im im))
  (+.p16 (*.p16 re re) (*.p16 im im))
  (+.p16 (real->posit16 0.0) (*.p16 im im))
  (+.p16 (*.p16 re re) (*.p16 im im))
  (-.p16 (real->posit16 0.0) (*.p16 im im))
  (real->posit16 1.0)
  (posit16->quire16 (+.p16 (*.p16 re re) (*.p16 im im)))
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) (*.p16 im im) (real->posit16 1.0))
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (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 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))
0.580 * * [simplify]: iteration 0: 35 enodes
0.595 * * [simplify]: iteration 1: 49 enodes
0.613 * * [simplify]: iteration 2: 85 enodes
0.648 * * [simplify]: iteration 3: 243 enodes
0.858 * * [simplify]: iteration 4: 737 enodes
1.369 * * [simplify]: iteration 5: 2054 enodes
2.169 * * [simplify]: iteration complete: 2054 enodes
2.169 * * [simplify]: Extracting #0: cost 19 inf + 0
2.170 * * [simplify]: Extracting #1: cost 310 inf + 1
2.173 * * [simplify]: Extracting #2: cost 568 inf + 3301
2.180 * * [simplify]: Extracting #3: cost 522 inf + 36374
2.190 * * [simplify]: Extracting #4: cost 471 inf + 60841
2.218 * * [simplify]: Extracting #5: cost 191 inf + 339010
2.271 * * [simplify]: Extracting #6: cost 11 inf + 561728
2.333 * * [simplify]: Extracting #7: cost 0 inf + 578481
2.393 * [simplify]: Simplified to:
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (neg.p16 re)
  re
  (neg.p16 re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (quire16-mul-sub (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re (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 re re) (*.p16 im im))))
  (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 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 2.0))))
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 0.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (*.p16 re re)
  (+.p16 (*.p16 re re) (*.p16 im im))
  (+.p16 (*.p16 re re) (*.p16 im im))
  (*.p16 im im)
  (+.p16 (*.p16 re re) (*.p16 im im))
  (neg.p16 (*.p16 im im))
  (real->posit16 1.0)
  (posit16->quire16 (+.p16 (*.p16 re re) (*.p16 im im)))
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) (*.p16 im im) (real->posit16 1.0))
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (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 0.5) (sqrt.p16 (*.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 2.0))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 2.0))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 2.0))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 2.0))))
2.398 * * * [progress]: adding candidates to table
3.522 * * [progress]: iteration 2 / 4
3.522 * * * [progress]: picking best candidate
3.582 * * * * [pick]: Picked  #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))>
3.582 * * * [progress]: localizing error
3.924 * * * [progress]: generating rewritten candidates
3.924 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 1 1 1)
3.924 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2)
3.929 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2 1)
3.929 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2)
3.930 * * * [progress]: generating series expansions
3.930 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 1 1 1)
3.930 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2)
3.930 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2 1)
3.930 * * * * [progress]: [ 4 / 4 ] generating series at (2 2)
3.930 * * * [progress]: simplifying candidates
3.930 * * * * [progress]: [ 1 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (real->posit16 0.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.930 * * * * [progress]: [ 2 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (-.p16 (real->posit16 0.0) re))))))>
3.930 * * * * [progress]: [ 3 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (+.p16 (real->posit16 0.0) re))))))>
3.930 * * * * [progress]: [ 4 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (neg.p16 re))))))>
3.930 * * * * [progress]: [ 5 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.930 * * * * [progress]: [ 6 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.931 * * * * [progress]: [ 7 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (quire16->posit16 (posit16->quire16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))))>
3.931 * * * * [progress]: [ 8 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) re (real->posit16 1.0)))))))>
3.931 * * * * [progress]: [ 9 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (real->posit16 0.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.931 * * * * [progress]: [ 10 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re) (real->posit16 0.0))))))>
3.931 * * * * [progress]: [ 11 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re) (real->posit16 0.0))))))>
3.931 * * * * [progress]: [ 12 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.931 * * * * [progress]: [ 13 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re) (real->posit16 1.0))))))>
3.931 * * * * [progress]: [ 14 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re) (real->posit16 1.0))))))>
3.931 * * * * [progress]: [ 15 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) re)))))>
3.931 * * * * [progress]: [ 16 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (quire16->posit16 (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re)))))>
3.931 * * * * [progress]: [ 17 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (+.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) re)))))>
3.931 * * * * [progress]: [ 18 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 0.0)) re)))))>
3.931 * * * * [progress]: [ 19 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 0.0)) re)))))>
3.931 * * * * [progress]: [ 20 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (*.p16 (real->posit16 1.0) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) re)))))>
3.931 * * * * [progress]: [ 21 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 1.0)) re)))))>
3.931 * * * * [progress]: [ 22 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (/.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 1.0)) re)))))>
3.932 * * * * [progress]: [ 23 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (real->posit16 1.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.932 * * * * [progress]: [ 24 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (quire16->posit16 (posit16->quire16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))))>
3.932 * * * * [progress]: [ 25 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (+.p16 (real->posit16 0.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.932 * * * * [progress]: [ 26 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (+.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))) (real->posit16 0.0))))>
3.932 * * * * [progress]: [ 27 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (-.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))) (real->posit16 0.0))))>
3.932 * * * * [progress]: [ 28 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (real->posit16 1.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
3.932 * * * * [progress]: [ 29 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))) (real->posit16 1.0))))>
3.932 * * * * [progress]: [ 30 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (/.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))) (real->posit16 1.0))))>
3.932 * * * * [progress]: [ 31 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))>
3.932 * * * * [progress]: [ 32 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))>
3.932 * * * * [progress]: [ 33 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))>
3.932 * * * * [progress]: [ 34 / 34 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))>
3.933 * [simplify]: Simplifying:
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (-.p16 (real->posit16 0.0) re)
  (+.p16 (real->posit16 0.0) re)
  (neg.p16 re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))
  (quire16-mul-sub (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) re (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-add (posit16->quire16 (*.p16 re re)) im im))))
  (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 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))
  (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-add (posit16->quire16 (*.p16 re re)) im im)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
3.933 * * [simplify]: iteration 0: 26 enodes
3.940 * * [simplify]: iteration 1: 34 enodes
3.947 * * [simplify]: iteration 2: 50 enodes
3.966 * * [simplify]: iteration 3: 130 enodes
4.009 * * [simplify]: iteration 4: 413 enodes
4.244 * * [simplify]: iteration 5: 2010 enodes
5.258 * * [simplify]: iteration complete: 2010 enodes
5.258 * * [simplify]: Extracting #0: cost 12 inf + 0
5.259 * * [simplify]: Extracting #1: cost 186 inf + 1
5.261 * * [simplify]: Extracting #2: cost 766 inf + 2653
5.264 * * [simplify]: Extracting #3: cost 719 inf + 45538
5.284 * * [simplify]: Extracting #4: cost 211 inf + 368943
5.329 * * [simplify]: Extracting #5: cost 25 inf + 515387
5.375 * * [simplify]: Extracting #6: cost 0 inf + 519392
5.442 * [simplify]: Simplified to:
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (neg.p16 re)
  re
  (neg.p16 re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 re (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))
  (quire16-mul-sub (posit16->quire16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) re (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-add (posit16->quire16 (*.p16 re re)) im im))))
  (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 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re) (real->posit16 2.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)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
  (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)
5.447 * * * [progress]: adding candidates to table
6.245 * * [progress]: iteration 3 / 4
6.245 * * * [progress]: picking best candidate
6.283 * * * * [pick]: Picked  #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.283 * * * [progress]: localizing error
6.558 * * * [progress]: generating rewritten candidates
6.558 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 2 1 1 1)
6.559 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2 1 1 2 1 1)
6.559 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2 1 1 1 1 1)
6.559 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2 1 2 1)
6.563 * * * [progress]: generating series expansions
6.563 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 2 1 1 1)
6.563 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2 1 1 2 1 1)
6.563 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2 1 1 1 1 1)
6.563 * * * * [progress]: [ 4 / 4 ] generating series at (2 2 1 2 1)
6.563 * * * [progress]: simplifying candidates
6.563 * * * * [progress]: [ 1 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (*.p16 (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 2 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (real->posit16 0.0)) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 3 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 4 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 0.0)) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 5 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 0.0)) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 6 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (*.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 7 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (-.p16 (*.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 8 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 9 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (-.p16 (real->posit16 0.0) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 10 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (+.p16 (real->posit16 0.0) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 11 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 12 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (neg.p16 (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 13 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) (*.p16 (*.p16 re re) (*.p16 re re))) (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 14 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 15 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.563 * * * * [progress]: [ 16 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) (*.p16 re re) (real->posit16 1.0))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 17 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 18 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 19 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 20 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 21 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 22 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (*.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (real->posit16 1.0)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 23 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (real->posit16 1.0)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 24 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 25 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 26 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * * * * [progress]: [ 27 / 27 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
6.564 * [simplify]: Simplifying:
  (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (real->posit16 0.0))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (real->posit16 0.0)) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (-.p16 (*.p16 (real->posit16 0.0) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (-.p16 (real->posit16 0.0) (*.p16 re re))
  (+.p16 (real->posit16 0.0) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (-.p16 (*.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) (*.p16 (*.p16 re re) (*.p16 re re)))
  (+.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) (*.p16 re re) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (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 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
6.565 * * [simplify]: iteration 0: 31 enodes
6.572 * * [simplify]: iteration 1: 57 enodes
6.585 * * [simplify]: iteration 2: 152 enodes
6.718 * * [simplify]: iteration 3: 553 enodes
6.856 * * [simplify]: iteration 4: 2004 enodes
7.460 * * [simplify]: iteration complete: 2004 enodes
7.460 * * [simplify]: Extracting #0: cost 13 inf + 0
7.460 * * [simplify]: Extracting #1: cost 143 inf + 0
7.463 * * [simplify]: Extracting #2: cost 642 inf + 247
7.469 * * [simplify]: Extracting #3: cost 850 inf + 19101
7.478 * * [simplify]: Extracting #4: cost 821 inf + 71034
7.483 * * [simplify]: Extracting #5: cost 800 inf + 86552
7.490 * * [simplify]: Extracting #6: cost 760 inf + 115739
7.513 * * [simplify]: Extracting #7: cost 420 inf + 420719
7.561 * * [simplify]: Extracting #8: cost 19 inf + 886965
7.616 * * [simplify]: Extracting #9: cost 0 inf + 911247
7.672 * [simplify]: Simplified to:
  (+.p16 re (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
  (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)
  (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (*.p16 re re)
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (*.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))))
  (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) (*.p16 re re) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (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 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 re (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 re (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 re (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
  (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re))
  (+.p16 re (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))
7.675 * * * [progress]: adding candidates to table
8.246 * * [progress]: iteration 4 / 4
8.246 * * * [progress]: picking best candidate
8.318 * * * * [pick]: Picked  #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
8.318 * * * [progress]: localizing error
8.782 * * * [progress]: generating rewritten candidates
8.782 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 1 1)
8.782 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2 2 1 1 1)
8.782 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2 1 1 1 1 2 1 1)
8.782 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2 1 2 1 1 1 1 1 1 1)
8.783 * * * [progress]: generating series expansions
8.783 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 1 1)
8.783 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2 2 1 1 1)
8.783 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2 1 1 1 1 2 1 1)
8.783 * * * * [progress]: [ 4 / 4 ] generating series at (2 2 1 2 1 1 1 1 1 1 1)
8.783 * * * [progress]: simplifying candidates
8.783 * * * * [progress]: [ 1 / 4 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
8.783 * * * * [progress]: [ 2 / 4 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
8.783 * * * * [progress]: [ 3 / 4 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
8.783 * * * * [progress]: [ 4 / 4 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))>
8.783 * [simplify]: Simplifying:
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
8.783 * * [simplify]: iteration 0: 10 enodes
8.785 * * [simplify]: iteration complete: 10 enodes
8.785 * * [simplify]: Extracting #0: cost 1 inf + 0
8.785 * * [simplify]: Extracting #1: cost 3 inf + 0
8.785 * * [simplify]: Extracting #2: cost 3 inf + 1
8.785 * * [simplify]: Extracting #3: cost 4 inf + 1
8.785 * * [simplify]: Extracting #4: cost 5 inf + 1
8.785 * * [simplify]: Extracting #5: cost 6 inf + 1
8.785 * * [simplify]: Extracting #6: cost 8 inf + 1
8.785 * * [simplify]: Extracting #7: cost 8 inf + 2
8.785 * * [simplify]: Extracting #8: cost 0 inf + 3696
8.786 * [simplify]: Simplified to:
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)
8.786 * * * [progress]: adding candidates to table
8.787 * [progress]: [Phase 3 of 3] Extracting.
8.787 * * [regime]: Finding splitpoints for: (#<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (*.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>)
8.788 * * * [regime-changes]: Trying 2 branch expressions: (im re)
8.788 * * * * [regimes]: Trying to branch on im from (#<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (*.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>)
8.910 * * * * [regimes]: Trying to branch on re from (#<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (*.p16 (-.p16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))) (*.p16 re re)) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))) (+.p16 (*.p16 re re) (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im)))))) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re)))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))))) re re)) (+.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>)
9.090 * * * [regime]: Found split indices: #<option (#s(si 1 256))>
9.091 * [simplify]: Simplifying:
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))
9.091 * * [simplify]: iteration 0: 15 enodes
9.093 * * [simplify]: iteration complete: 15 enodes
9.093 * * [simplify]: Extracting #0: cost 1 inf + 0
9.093 * * [simplify]: Extracting #1: cost 3 inf + 0
9.093 * * [simplify]: Extracting #2: cost 5 inf + 0
9.093 * * [simplify]: Extracting #3: cost 6 inf + 1
9.093 * * [simplify]: Extracting #4: cost 8 inf + 2
9.093 * * [simplify]: Extracting #5: cost 6 inf + 5
9.094 * * [simplify]: Extracting #6: cost 7 inf + 5
9.094 * * [simplify]: Extracting #7: cost 9 inf + 5
9.094 * * [simplify]: Extracting #8: cost 9 inf + 6
9.094 * * [simplify]: Extracting #9: cost 8 inf + 327
9.094 * * [simplify]: Extracting #10: cost 5 inf + 1292
9.094 * * [simplify]: Extracting #11: cost 3 inf + 2096
9.095 * * [simplify]: Extracting #12: cost 1 inf + 3662
9.095 * * [simplify]: Extracting #13: cost 0 inf + 4786
9.096 * [simplify]: Simplified to:
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (sqrt.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 re re)) im im))) re))))
9.096 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
9.139 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
9.144 * * * * [points]: Setting MPFR precision to 64
9.146 * * * * [points]: Setting MPFR precision to 320
9.147 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
9.151 * * * * [points]: Setting MPFR precision to 64
9.154 * * * * [points]: Setting MPFR precision to 320
9.158 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
9.162 * * * * [points]: Setting MPFR precision to 64
9.168 * * * * [points]: Setting MPFR precision to 320
9.174 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
9.178 * * * * [points]: Setting MPFR precision to 64
9.187 * * * * [points]: Setting MPFR precision to 320
9.195 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
9.211 * * * * [points]: Setting MPFR precision to 64
9.237 * * * * [points]: Setting MPFR precision to 320
9.251 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
9.253 * * * * [points]: Setting MPFR precision to 64
9.292 * * * * [points]: Setting MPFR precision to 320
9.327 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
9.332 * * * * [points]: Setting MPFR precision to 64
9.452 * * * * [points]: Setting MPFR precision to 320
9.534 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
9.538 * * * * [points]: Setting MPFR precision to 64
9.722 * * * * [points]: Setting MPFR precision to 320
9.892 * * * * [points]: Computing exacts for 8000 points
9.896 * * * * [points]: Setting MPFR precision to 64
10.644 * * * * [points]: Setting MPFR precision to 320
11.860 * * * * [points]: Filtering points with unrepresentable outputs
11.911 * * * * [points]: Sampled 8000 points with exact outputs
16.864 * [regime-testing]: Baseline error score: 1.9982951826049957
16.869 * [regime-testing]: Oracle error score: 1.650128151995361
16.880 * [regime-testing]: End program error score: 1.9982951826049957