33.607 * [progress]: [Phase 1 of 3] Setting up.
0.001 * * * [progress]: [1/2] Preparing points
0.001 * * * * [points]: Sampling 256 additional inputs, on iter 0 have 0 / 256
0.002 * * * * [points]: Computing exacts on every 16 of 256 points to ramp up precision
0.005 * * * * [points]: Setting MPFR precision to 64
0.006 * * * * [points]: Setting MPFR precision to 320
0.007 * * * * [points]: Computing exacts on every 8 of 256 points to ramp up precision
0.009 * * * * [points]: Setting MPFR precision to 64
0.011 * * * * [points]: Setting MPFR precision to 320
0.012 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.014 * * * * [points]: Setting MPFR precision to 64
0.021 * * * * [points]: Setting MPFR precision to 320
0.024 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.027 * * * * [points]: Setting MPFR precision to 64
0.033 * * * * [points]: Setting MPFR precision to 320
0.038 * * * * [points]: Computing exacts for 256 points
0.040 * * * * [points]: Setting MPFR precision to 64
0.058 * * * * [points]: Setting MPFR precision to 320
0.076 * * * * [points]: Filtering points with unrepresentable outputs
0.076 * * * * [points]: Sampled 256 points with exact outputs
0.077 * * * [progress]: [2/2] Setting up program.
0.089 * [progress]: [Phase 2 of 3] Improving.
0.089 * * * * [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.090 * [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.090 * * [simplify]: iteration 0: 14 enodes
0.093 * * [simplify]: iteration 1: 19 enodes
0.098 * * [simplify]: iteration 2: 26 enodes
0.106 * * [simplify]: iteration 3: 28 enodes
0.114 * * [simplify]: iteration complete: 28 enodes
0.114 * * [simplify]: Extracting #0: cost 1 inf + 0
0.114 * * [simplify]: Extracting #1: cost 3 inf + 0
0.114 * * [simplify]: Extracting #2: cost 5 inf + 0
0.114 * * [simplify]: Extracting #3: cost 8 inf + 1
0.114 * * [simplify]: Extracting #4: cost 11 inf + 2
0.114 * * [simplify]: Extracting #5: cost 8 inf + 86
0.114 * * [simplify]: Extracting #6: cost 9 inf + 488
0.114 * * [simplify]: Extracting #7: cost 9 inf + 809
0.114 * * [simplify]: Extracting #8: cost 7 inf + 1131
0.115 * * [simplify]: Extracting #9: cost 5 inf + 2535
0.115 * * [simplify]: Extracting #10: cost 2 inf + 5503
0.116 * * [simplify]: Extracting #11: cost 0 inf + 8150
0.116 * [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.117 * * [progress]: iteration 1 / 4
0.117 * * * [progress]: picking best candidate
0.140 * * * * [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.140 * * * [progress]: localizing error
0.397 * * * [progress]: generating rewritten candidates
0.397 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2)
0.400 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2 1)
0.400 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2)
0.400 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2 1 2 1 1)
0.404 * * * [progress]: generating series expansions
0.404 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2)
0.404 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2 1)
0.404 * * * * [progress]: [ 3 / 4 ] generating series at (2 2)
0.405 * * * * [progress]: [ 4 / 4 ] generating series at (2 2 1 2 1 1)
0.405 * * * [progress]: simplifying candidates
0.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.405 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.406 * * * * [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.407 * [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.407 * * [simplify]: iteration 0: 35 enodes
0.414 * * [simplify]: iteration 1: 49 enodes
0.422 * * [simplify]: iteration 2: 85 enodes
0.453 * * [simplify]: iteration 3: 243 enodes
0.635 * * [simplify]: iteration 4: 737 enodes
2.528 * * [simplify]: iteration 5: 3200 enodes
5.265 * * [simplify]: iteration complete: 5131 enodes
5.265 * * [simplify]: Extracting #0: cost 19 inf + 0
5.267 * * [simplify]: Extracting #1: cost 606 inf + 1
5.273 * * [simplify]: Extracting #2: cost 881 inf + 5235
5.278 * * [simplify]: Extracting #3: cost 1097 inf + 36184
5.299 * * [simplify]: Extracting #4: cost 493 inf + 508788
5.354 * * [simplify]: Extracting #5: cost 20 inf + 1027658
5.412 * * [simplify]: Extracting #6: cost 0 inf + 1050313
5.494 * [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 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))
  (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))))
5.497 * * * [progress]: adding candidates to table
6.443 * * [progress]: iteration 2 / 4
6.443 * * * [progress]: picking best candidate
6.489 * * * * [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)))))>
6.489 * * * [progress]: localizing error
6.757 * * * [progress]: generating rewritten candidates
6.757 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 1 1 1)
6.758 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2)
6.760 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2 1)
6.760 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2)
6.761 * * * [progress]: generating series expansions
6.761 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 1 1 1)
6.761 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2)
6.761 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2 1)
6.761 * * * * [progress]: [ 4 / 4 ] generating series at (2 2)
6.761 * * * [progress]: simplifying candidates
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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)))))))>
6.761 * * * * [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)))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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))))))>
6.761 * * * * [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)))))>
6.761 * * * * [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)))))>
6.761 * * * * [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)))))>
6.761 * * * * [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)))))>
6.761 * * * * [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)))))>
6.761 * * * * [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)))))>
6.761 * * * * [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)))))>
6.762 * * * * [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)))))>
6.762 * * * * [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))))))>
6.762 * * * * [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)))))))>
6.762 * * * * [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))))))>
6.762 * * * * [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))))>
6.762 * * * * [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))))>
6.762 * * * * [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))))))>
6.762 * * * * [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))))>
6.762 * * * * [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))))>
6.762 * * * * [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)))))>
6.762 * * * * [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)))))>
6.762 * * * * [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)))))>
6.762 * * * * [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)))))>
6.762 * [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)
6.763 * * [simplify]: iteration 0: 26 enodes
6.768 * * [simplify]: iteration 1: 34 enodes
6.773 * * [simplify]: iteration 2: 50 enodes
6.790 * * [simplify]: iteration 3: 130 enodes
6.833 * * [simplify]: iteration 4: 413 enodes
7.112 * * [simplify]: iteration 5: 2145 enodes
9.643 * * [simplify]: iteration complete: 5027 enodes
9.643 * * [simplify]: Extracting #0: cost 12 inf + 0
9.645 * * [simplify]: Extracting #1: cost 397 inf + 1
9.650 * * [simplify]: Extracting #2: cost 1117 inf + 1932
9.661 * * [simplify]: Extracting #3: cost 1890 inf + 26812
9.715 * * [simplify]: Extracting #4: cost 841 inf + 545801
9.842 * * [simplify]: Extracting #5: cost 38 inf + 1127417
9.964 * * [simplify]: Extracting #6: cost 0 inf + 1157318
10.099 * [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)
10.101 * * * [progress]: adding candidates to table
10.903 * * [progress]: iteration 3 / 4
10.904 * * * [progress]: picking best candidate
10.931 * * * * [pick]: Picked  #<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))))))>
10.931 * * * [progress]: localizing error
11.235 * * * [progress]: generating rewritten candidates
11.235 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 1)
11.238 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2 2)
11.241 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2 1 2)
11.247 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2 1 2 2 1)
11.248 * * * [progress]: generating series expansions
11.248 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 1)
11.248 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2 2)
11.248 * * * * [progress]: [ 3 / 4 ] generating series at (2 2 1 2)
11.248 * * * * [progress]: [ 4 / 4 ] generating series at (2 2 1 2 2 1)
11.248 * * * [progress]: simplifying candidates
11.248 * * * * [progress]: [ 1 / 78 ] 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))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 2 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (real->posit16 0.0)) (*.p16 re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 3 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 4 / 78 ] 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))) (real->posit16 0.0)) (-.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))))))>
11.248 * * * * [progress]: [ 5 / 78 ] 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 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 0.0)) (*.p16 re re))) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 6 / 78 ] 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 (+.p16 (*.p16 re re) (*.p16 im im)))) (-.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))))))>
11.248 * * * * [progress]: [ 7 / 78 ] 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 (*.p16 (real->posit16 0.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 8 / 78 ] 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 (+.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))))))>
11.248 * * * * [progress]: [ 9 / 78 ] 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 (real->posit16 0.0) (*.p16 re re))) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 10 / 78 ] 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 (real->posit16 0.0) (*.p16 re re))) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 11 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.248 * * * * [progress]: [ 12 / 78 ] 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)))) (neg.p16 (*.p16 re re))) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 13 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re 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))))))>
11.249 * * * * [progress]: [ 14 / 78 ] 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 (+.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))))))>
11.249 * * * * [progress]: [ 15 / 78 ] 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 (+.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))))))>
11.249 * * * * [progress]: [ 16 / 78 ] 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 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 re re) (real->posit16 1.0))) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 17 / 78 ] 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 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 18 / 78 ] 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 (+.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))))))>
11.249 * * * * [progress]: [ 19 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (+.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 20 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 0.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 21 / 78 ] 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 (+.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))))))>
11.249 * * * * [progress]: [ 22 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (*.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 23 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.249 * * * * [progress]: [ 24 / 78 ] 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 (real->posit16 0.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.249 * * * * [progress]: [ 25 / 78 ] 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))) (+.p16 (real->posit16 0.0) re)))))))>
11.249 * * * * [progress]: [ 26 / 78 ] 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))) (-.p16 (real->posit16 0.0) re)))))))>
11.249 * * * * [progress]: [ 27 / 78 ] 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 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.249 * * * * [progress]: [ 28 / 78 ] 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)) (quire16->posit16 (posit16->quire16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))))>
11.249 * * * * [progress]: [ 29 / 78 ] 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)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re (real->posit16 1.0))))))))>
11.249 * * * * [progress]: [ 30 / 78 ] 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 (real->posit16 0.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.249 * * * * [progress]: [ 31 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 0.0)))))))>
11.249 * * * * [progress]: [ 32 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 0.0)))))))>
11.249 * * * * [progress]: [ 33 / 78 ] 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 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.249 * * * * [progress]: [ 34 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0)))))))>
11.249 * * * * [progress]: [ 35 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0)))))))>
11.249 * * * * [progress]: [ 36 / 78 ] 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 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))))))))>
11.250 * * * * [progress]: [ 37 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.250 * * * * [progress]: [ 38 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>
11.250 * * * * [progress]: [ 39 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.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)) (real->posit16 1.0))))))>
11.250 * * * * [progress]: [ 40 / 78 ] 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) (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.250 * * * * [progress]: [ 41 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))))))))>
11.250 * * * * [progress]: [ 42 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))))))))>
11.250 * * * * [progress]: [ 43 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0)))))))>
11.250 * * * * [progress]: [ 44 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.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)) (real->posit16 1.0))))))>
11.250 * * * * [progress]: [ 45 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re re))) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))))))))>
11.250 * * * * [progress]: [ 46 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0)))))))>
11.250 * * * * [progress]: [ 47 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.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)))))))>
11.250 * * * * [progress]: [ 48 / 78 ] 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))) re) (real->posit16 1.0)) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.250 * * * * [progress]: [ 49 / 78 ] 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))) re) (real->posit16 1.0)) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.250 * * * * [progress]: [ 50 / 78 ] 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))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0)))))))>
11.250 * * * * [progress]: [ 51 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.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)))))))>
11.250 * * * * [progress]: [ 52 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.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)))))))>
11.250 * * * * [progress]: [ 53 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)))))))>
11.250 * * * * [progress]: [ 54 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.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)))))))>
11.250 * * * * [progress]: [ 55 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.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)))))))>
11.250 * * * * [progress]: [ 56 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)))))))>
11.250 * * * * [progress]: [ 57 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.250 * * * * [progress]: [ 58 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))))>
11.250 * * * * [progress]: [ 59 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.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)) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
11.250 * * * * [progress]: [ 60 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (quire16->posit16 (posit16->quire16 (/.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))))))))>
11.250 * * * * [progress]: [ 61 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (real->posit16 0.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)))))))>
11.251 * * * * [progress]: [ 62 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (/.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)) (real->posit16 0.0))))))>
11.251 * * * * [progress]: [ 63 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (/.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)) (real->posit16 0.0))))))>
11.251 * * * * [progress]: [ 64 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.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)))))))>
11.251 * * * * [progress]: [ 65 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.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)) (real->posit16 1.0))))))>
11.251 * * * * [progress]: [ 66 / 78 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.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)) (real->posit16 1.0))))))>
11.251 * * * * [progress]: [ 67 / 78 ] 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 (*.p16 (real->posit16 1.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re))))))>
11.251 * * * * [progress]: [ 68 / 78 ] 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 (quire16->posit16 (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) re))))))>
11.251 * * * * [progress]: [ 69 / 78 ] 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 (+.p16 (real->posit16 0.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re))))))>
11.251 * * * * [progress]: [ 70 / 78 ] 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 0.0)) re))))))>
11.251 * * * * [progress]: [ 71 / 78 ] 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 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 0.0)) re))))))>
11.251 * * * * [progress]: [ 72 / 78 ] 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 (*.p16 (real->posit16 1.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) re))))))>
11.251 * * * * [progress]: [ 73 / 78 ] 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 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 1.0)) re))))))>
11.251 * * * * [progress]: [ 74 / 78 ] 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 (/.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 1.0)) re))))))>
11.251 * * * * [progress]: [ 75 / 78 ] 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))))))>
11.251 * * * * [progress]: [ 76 / 78 ] 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))))))>
11.251 * * * * [progress]: [ 77 / 78 ] 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))))))>
11.251 * * * * [progress]: [ 78 / 78 ] 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))))))>
11.252 * [simplify]: Simplifying:
  (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (real->posit16 0.0))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re 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 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (real->posit16 0.0)) (*.p16 re 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 (*.p16 (real->posit16 0.0) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re 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 (real->posit16 0.0) (*.p16 re re))
  (+.p16 (real->posit16 0.0) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re re)))
  (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 re re) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (+.p16 (real->posit16 0.0) re)
  (-.p16 (real->posit16 0.0) re)
  (real->posit16 1.0)
  (posit16->quire16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (quire16-mul-add (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)
  (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.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)) (real->posit16 1.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))
  (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.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))
  (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) 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 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0))
  (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0))
  (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.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))
  (/.p16 (real->posit16 1.0) (real->posit16 1.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))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.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))
  (/.p16 (real->posit16 1.0) (real->posit16 1.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))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.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)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.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))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.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)))
  (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)
  (-.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)
  (-.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)
  (-.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)
  (-.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)
11.253 * * [simplify]: iteration 0: 48 enodes
11.264 * * [simplify]: iteration 1: 85 enodes
11.281 * * [simplify]: iteration 2: 351 enodes
12.006 * * [simplify]: iteration 3: 1638 enodes
12.502 * * [simplify]: iteration complete: 5019 enodes
12.502 * * [simplify]: Extracting #0: cost 24 inf + 0
12.504 * * [simplify]: Extracting #1: cost 416 inf + 1
12.509 * * [simplify]: Extracting #2: cost 1603 inf + 7394
12.525 * * [simplify]: Extracting #3: cost 1799 inf + 186670
12.549 * * [simplify]: Extracting #4: cost 1612 inf + 341613
12.570 * * [simplify]: Extracting #5: cost 1529 inf + 374656
12.594 * * [simplify]: Extracting #6: cost 1298 inf + 647584
12.653 * * [simplify]: Extracting #7: cost 534 inf + 1720231
12.803 * * [simplify]: Extracting #8: cost 40 inf + 2603952
12.954 * * [simplify]: Extracting #9: cost 0 inf + 2682380
13.145 * [simplify]: Simplified to:
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (*.p16 re re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (neg.p16 (*.p16 re re))
  (*.p16 (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))
  (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))))) (*.p16 re re) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))))) 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 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  re
  (neg.p16 re)
  (real->posit16 1.0)
  (posit16->quire16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (quire16-mul-add (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) 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)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (real->posit16 1.0)
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re 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)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 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 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
13.154 * * * [progress]: adding candidates to table
14.721 * * [progress]: iteration 4 / 4
14.721 * * * [progress]: picking best candidate
14.975 * * * * [pick]: Picked  #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
14.975 * * * [progress]: localizing error
15.378 * * * [progress]: generating rewritten candidates
15.378 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 1 2 2 2)
15.383 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 2 2 2 1)
15.383 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2)
15.384 * * * * [progress]: [ 4 / 4 ] rewriting at (2 2 1 2)
15.395 * * * [progress]: generating series expansions
15.395 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 1 2 2 2)
15.395 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 2 2 2 1)
15.395 * * * * [progress]: [ 3 / 4 ] generating series at (2 2)
15.395 * * * * [progress]: [ 4 / 4 ] generating series at (2 2 1 2)
15.395 * * * [progress]: simplifying candidates
15.395 * * * * [progress]: [ 1 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (+.p16 (real->posit16 0.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.395 * * * * [progress]: [ 2 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (-.p16 (real->posit16 0.0) re))))))))>
15.395 * * * * [progress]: [ 3 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (+.p16 (real->posit16 0.0) re))))))))>
15.395 * * * * [progress]: [ 4 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (neg.p16 re))))))))>
15.395 * * * * [progress]: [ 5 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.396 * * * * [progress]: [ 6 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.396 * * * * [progress]: [ 7 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (posit16->quire16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))))>
15.396 * * * * [progress]: [ 8 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) re (real->posit16 1.0)))))))))>
15.396 * * * * [progress]: [ 9 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (+.p16 (real->posit16 0.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.396 * * * * [progress]: [ 10 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (+.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (real->posit16 0.0))))))))>
15.396 * * * * [progress]: [ 11 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (real->posit16 0.0))))))))>
15.396 * * * * [progress]: [ 12 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.396 * * * * [progress]: [ 13 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (*.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (real->posit16 1.0))))))))>
15.396 * * * * [progress]: [ 14 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (real->posit16 1.0))))))))>
15.396 * * * * [progress]: [ 15 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (real->posit16 1.0) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) re)))))))>
15.396 * * * * [progress]: [ 16 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (quire16->posit16 (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))))) re)))))))>
15.396 * * * * [progress]: [ 17 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (+.p16 (real->posit16 0.0) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) re)))))))>
15.396 * * * * [progress]: [ 18 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (real->posit16 0.0)) re)))))))>
15.396 * * * * [progress]: [ 19 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (real->posit16 0.0)) re)))))))>
15.397 * * * * [progress]: [ 20 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (real->posit16 1.0) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) re)))))))>
15.397 * * * * [progress]: [ 21 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (real->posit16 1.0)) re)))))))>
15.397 * * * * [progress]: [ 22 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (/.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (real->posit16 1.0)) re)))))))>
15.397 * * * * [progress]: [ 23 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (real->posit16 1.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.397 * * * * [progress]: [ 24 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (quire16->posit16 (posit16->quire16 (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))))>
15.397 * * * * [progress]: [ 25 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (+.p16 (real->posit16 0.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.397 * * * * [progress]: [ 26 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (+.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))) (real->posit16 0.0))))>
15.397 * * * * [progress]: [ 27 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (-.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))) (real->posit16 0.0))))>
15.397 * * * * [progress]: [ 28 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (real->posit16 1.0) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.397 * * * * [progress]: [ 29 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (*.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))) (real->posit16 1.0))))>
15.397 * * * * [progress]: [ 30 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (/.p16 (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))) (real->posit16 1.0))))>
15.397 * * * * [progress]: [ 31 / 104 ] 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)))))>
15.397 * * * * [progress]: [ 32 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))>
15.397 * * * * [progress]: [ 33 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 1.0))))))>
15.397 * * * * [progress]: [ 34 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 35 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 36 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 37 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.398 * * * * [progress]: [ 38 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 39 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 40 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.398 * * * * [progress]: [ 41 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 42 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 43 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.398 * * * * [progress]: [ 44 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.398 * * * * [progress]: [ 45 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 1.0))))))>
15.398 * * * * [progress]: [ 46 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0)))))))>
15.398 * * * * [progress]: [ 47 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0)))))))>
15.399 * * * * [progress]: [ 48 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0)))))))>
15.399 * * * * [progress]: [ 49 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))>
15.399 * * * * [progress]: [ 50 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0)))))))>
15.399 * * * * [progress]: [ 51 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.399 * * * * [progress]: [ 52 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.399 * * * * [progress]: [ 53 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.399 * * * * [progress]: [ 54 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.399 * * * * [progress]: [ 55 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.399 * * * * [progress]: [ 56 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.399 * * * * [progress]: [ 57 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.399 * * * * [progress]: [ 58 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.399 * * * * [progress]: [ 59 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.399 * * * * [progress]: [ 60 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.400 * * * * [progress]: [ 61 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 62 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 63 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.400 * * * * [progress]: [ 64 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 65 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.400 * * * * [progress]: [ 66 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.400 * * * * [progress]: [ 67 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.400 * * * * [progress]: [ 68 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 69 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 70 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 71 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.400 * * * * [progress]: [ 72 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 73 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.400 * * * * [progress]: [ 74 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.401 * * * * [progress]: [ 75 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 76 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 77 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.401 * * * * [progress]: [ 78 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 79 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.401 * * * * [progress]: [ 80 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re)))) (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.401 * * * * [progress]: [ 81 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.401 * * * * [progress]: [ 82 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 83 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 84 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 85 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.401 * * * * [progress]: [ 86 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.401 * * * * [progress]: [ 87 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.402 * * * * [progress]: [ 88 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.402 * * * * [progress]: [ 89 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.402 * * * * [progress]: [ 90 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.412 * * * * [progress]: [ 91 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))))))>
15.412 * * * * [progress]: [ 92 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.412 * * * * [progress]: [ 93 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))))>
15.412 * * * * [progress]: [ 94 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (quire16->posit16 (posit16->quire16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))))>
15.412 * * * * [progress]: [ 95 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (real->posit16 0.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.412 * * * * [progress]: [ 96 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 0.0))))))>
15.412 * * * * [progress]: [ 97 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (-.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 0.0))))))>
15.412 * * * * [progress]: [ 98 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))))>
15.412 * * * * [progress]: [ 99 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 1.0))))))>
15.412 * * * * [progress]: [ 100 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))) (real->posit16 1.0))))))>
15.412 * * * * [progress]: [ 101 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.413 * * * * [progress]: [ 102 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.413 * * * * [progress]: [ 103 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.413 * * * * [progress]: [ 104 / 104 ] simplifiying candidate #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))>
15.415 * [simplify]: Simplifying:
  (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (-.p16 (real->posit16 0.0) re)
  (+.p16 (real->posit16 0.0) re)
  (neg.p16 re)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))
  (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (quire16-mul-sub (posit16->quire16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) 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 im im) (*.p16 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)
  (real->posit16 1.0)
  (posit16->quire16 (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re 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 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0))
  (/.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0))
  (/.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (*.p16 (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re)))) (*.p16 re re))))
  (/.p16 (real->posit16 1.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re 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 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))
  (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re))))))
15.417 * * [simplify]: iteration 0: 38 enodes
15.432 * * [simplify]: iteration 1: 59 enodes
15.453 * * [simplify]: iteration 2: 89 enodes
15.506 * * [simplify]: iteration 3: 290 enodes
15.808 * * [simplify]: iteration 4: 1123 enodes
18.829 * * [simplify]: iteration 5: 4914 enodes
20.900 * * [simplify]: iteration complete: 5073 enodes
20.900 * * [simplify]: Extracting #0: cost 14 inf + 0
20.901 * * [simplify]: Extracting #1: cost 263 inf + 82
20.905 * * [simplify]: Extracting #2: cost 647 inf + 3160
20.914 * * [simplify]: Extracting #3: cost 530 inf + 64814
20.935 * * [simplify]: Extracting #4: cost 416 inf + 113489
20.950 * * [simplify]: Extracting #5: cost 405 inf + 117189
20.966 * * [simplify]: Extracting #6: cost 404 inf + 117871
21.002 * * [simplify]: Extracting #7: cost 123 inf + 395590
21.059 * * [simplify]: Extracting #8: cost 2 inf + 542573
21.122 * * [simplify]: Extracting #9: cost 0 inf + 544819
21.182 * [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 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))
  (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 (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)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))
  (real->posit16 1.0)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (/.p16 (real->posit16 1.0) (+.p16 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))))
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (/.p16 (real->posit16 1.0) (+.p16 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))))
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))
  (/.p16 (real->posit16 1.0) (+.p16 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))))
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) 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))
  (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))))
21.203 * * * [progress]: adding candidates to table
22.159 * [progress]: [Phase 3 of 3] Extracting.
22.159 * * [regime]: Finding splitpoints for: (#<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))))))> #<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 (real->posit16 1.0) (+.p16 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))))))))> #<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 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re re))) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re 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))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))> #<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) (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>)
22.169 * * * [regime-changes]: Trying 2 branch expressions: (im re)
22.169 * * * * [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 (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))))))> #<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 (real->posit16 1.0) (+.p16 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))))))))> #<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 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re re))) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re 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))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))> #<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) (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>)
22.456 * * * * [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 (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))))))> #<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 (real->posit16 1.0) (+.p16 re (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))))))))> #<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 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re re))) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (+.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 re re))))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (*.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (/.p16 (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re) (+.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im)))) (*.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) (*.p16 (*.p16 re re) (*.p16 re 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))))))> #<alt (λ (re im) (*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (-.p16 (sqrt.p16 (+.p16 (*.p16 im im) (*.p16 re re))) re)))))))> #<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) (/.p16 (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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))) re) (-.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 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 (+.p16 (*.p16 re re) (*.p16 im im))) (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))) re re)) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re))))))>)
22.690 * * * [regime]: Found split indices: #<option (#s(si 2 256))>
22.690 * [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))))
22.691 * * [simplify]: iteration 0: 15 enodes
22.692 * * [simplify]: iteration complete: 15 enodes
22.692 * * [simplify]: Extracting #0: cost 1 inf + 0
22.692 * * [simplify]: Extracting #1: cost 3 inf + 0
22.692 * * [simplify]: Extracting #2: cost 5 inf + 0
22.692 * * [simplify]: Extracting #3: cost 6 inf + 1
22.692 * * [simplify]: Extracting #4: cost 8 inf + 2
22.692 * * [simplify]: Extracting #5: cost 6 inf + 5
22.692 * * [simplify]: Extracting #6: cost 7 inf + 5
22.692 * * [simplify]: Extracting #7: cost 9 inf + 5
22.692 * * [simplify]: Extracting #8: cost 9 inf + 6
22.692 * * [simplify]: Extracting #9: cost 8 inf + 327
22.692 * * [simplify]: Extracting #10: cost 5 inf + 1292
22.692 * * [simplify]: Extracting #11: cost 3 inf + 2096
22.692 * * [simplify]: Extracting #12: cost 1 inf + 3662
22.693 * * [simplify]: Extracting #13: cost 0 inf + 4786
22.693 * [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))))
22.693 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
22.716 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
22.718 * * * * [points]: Setting MPFR precision to 64
22.719 * * * * [points]: Setting MPFR precision to 320
22.720 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
22.722 * * * * [points]: Setting MPFR precision to 64
22.724 * * * * [points]: Setting MPFR precision to 320
22.726 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
22.728 * * * * [points]: Setting MPFR precision to 64
22.732 * * * * [points]: Setting MPFR precision to 320
22.736 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
22.738 * * * * [points]: Setting MPFR precision to 64
22.745 * * * * [points]: Setting MPFR precision to 320
22.765 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
22.768 * * * * [points]: Setting MPFR precision to 64
22.796 * * * * [points]: Setting MPFR precision to 320
22.823 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
22.827 * * * * [points]: Setting MPFR precision to 64
22.877 * * * * [points]: Setting MPFR precision to 320
22.912 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
22.915 * * * * [points]: Setting MPFR precision to 64
23.063 * * * * [points]: Setting MPFR precision to 320
23.171 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
23.176 * * * * [points]: Setting MPFR precision to 64
23.419 * * * * [points]: Setting MPFR precision to 320
23.618 * * * * [points]: Computing exacts for 8000 points
23.623 * * * * [points]: Setting MPFR precision to 64
24.319 * * * * [points]: Setting MPFR precision to 320
25.181 * * * * [points]: Filtering points with unrepresentable outputs
25.640 * * * * [points]: Sampled 8000 points with exact outputs
33.296 * [regime-testing]: Baseline error score: 2.0602134516097554
33.300 * [regime-testing]: Oracle error score: 1.6221840600687856
33.309 * [regime-testing]: End program error score: 2.0602134516097554