29.715 * [progress]: [Phase 1 of 3] Setting up.
0.001 * * * [progress]: [1/2] Preparing points
0.002 * * * * [points]: Sampling 256 additional inputs, on iter 0 have 0 / 256
0.003 * * * * [points]: Computing exacts on every 16 of 256 points to ramp up precision
0.004 * * * * [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.008 * * * * [points]: Setting MPFR precision to 64
0.010 * * * * [points]: Setting MPFR precision to 320
0.012 * * * * [points]: Computing exacts on every 4 of 256 points to ramp up precision
0.013 * * * * [points]: Setting MPFR precision to 64
0.017 * * * * [points]: Setting MPFR precision to 320
0.023 * * * * [points]: Computing exacts on every 2 of 256 points to ramp up precision
0.025 * * * * [points]: Setting MPFR precision to 64
0.035 * * * * [points]: Setting MPFR precision to 320
0.046 * * * * [points]: Computing exacts for 256 points
0.048 * * * * [points]: Setting MPFR precision to 64
0.079 * * * * [points]: Setting MPFR precision to 320
0.113 * * * * [points]: Filtering points with unrepresentable outputs
0.114 * * * * [points]: Sampled 256 points with exact outputs
0.114 * * * [progress]: [2/2] Setting up program.
0.123 * [progress]: [Phase 2 of 3] Improving.
0.123 * * * * [progress]: [ 1 / 1 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.124 * [simplify]: Simplifying:
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
0.124 * * [simplify]: iteration 0: 11 enodes
0.125 * * [simplify]: iteration 1: 16 enodes
0.127 * * [simplify]: iteration 2: 17 enodes
0.130 * * [simplify]: iteration complete: 17 enodes
0.130 * * [simplify]: Extracting #0: cost 1 inf + 0
0.130 * * [simplify]: Extracting #1: cost 3 inf + 0
0.130 * * [simplify]: Extracting #2: cost 8 inf + 0
0.130 * * [simplify]: Extracting #3: cost 12 inf + 0
0.130 * * [simplify]: Extracting #4: cost 3 inf + 2052
0.130 * * [simplify]: Extracting #5: cost 0 inf + 4942
0.130 * [simplify]: Simplified to:
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
0.136 * * [progress]: iteration 1 / 4
0.136 * * * [progress]: picking best candidate
0.159 * * * * [pick]: Picked  #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.159 * * * [progress]: localizing error
0.368 * * * [progress]: generating rewritten candidates
0.368 * * * * [progress]: [ 1 / 3 ] rewriting at (2)
0.375 * * * * [progress]: [ 2 / 3 ] rewriting at (2 1)
0.381 * * * * [progress]: [ 3 / 3 ] rewriting at (2 2)
0.390 * * * [progress]: generating series expansions
0.390 * * * * [progress]: [ 1 / 3 ] generating series at (2)
0.390 * * * * [progress]: [ 2 / 3 ] generating series at (2 1)
0.390 * * * * [progress]: [ 3 / 3 ] generating series at (2 2)
0.390 * * * [progress]: simplifying candidates
0.390 * * * * [progress]: [ 1 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.390 * * * * [progress]: [ 2 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.390 * * * * [progress]: [ 3 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (real->posit16 1.0)))>
0.390 * * * * [progress]: [ 4 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))>
0.390 * * * * [progress]: [ 5 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))>
0.390 * * * * [progress]: [ 6 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 1.0))))>
0.390 * * * * [progress]: [ 7 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (real->posit16 1.0)))>
0.390 * * * * [progress]: [ 8 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))>
0.390 * * * * [progress]: [ 9 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (*.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 1.0))))>
0.390 * * * * [progress]: [ 10 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.390 * * * * [progress]: [ 11 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.390 * * * * [progress]: [ 12 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 13 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))))>
0.391 * * * * [progress]: [ 14 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 15 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 16 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))))>
0.391 * * * * [progress]: [ 17 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 18 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 19 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
0.391 * * * * [progress]: [ 20 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))))>
0.391 * * * * [progress]: [ 21 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 22 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (real->posit16 0.0)))>
0.391 * * * * [progress]: [ 23 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (-.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (real->posit16 0.0)))>
0.391 * * * * [progress]: [ 24 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.391 * * * * [progress]: [ 25 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (real->posit16 1.0)))>
0.391 * * * * [progress]: [ 26 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))) (real->posit16 1.0)))>
0.391 * * * * [progress]: [ 27 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (-.p16 (*.p16 x.im y.re) (real->posit16 0.0)) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 28 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 29 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 30 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (*.p16 x.im y.re) (-.p16 (real->posit16 0.0) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 31 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (+.p16 (real->posit16 0.0) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 32 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 33 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (*.p16 x.im y.re) (neg.p16 (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 34 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 35 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 36 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 37 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) (*.p16 x.re y.im) (real->posit16 1.0))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 38 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.391 * * * * [progress]: [ 39 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 40 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 41 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 42 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 43 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (*.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 44 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 45 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (+.p16 (*.p16 y.re y.re) (real->posit16 0.0)) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 46 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 0.0))))>
0.392 * * * * [progress]: [ 47 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (real->posit16 0.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.392 * * * * [progress]: [ 48 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (+.p16 (real->posit16 0.0) (*.p16 y.im y.im)))))>
0.392 * * * * [progress]: [ 49 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (-.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 0.0))))>
0.392 * * * * [progress]: [ 50 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (-.p16 (*.p16 y.re y.re) (-.p16 (real->posit16 0.0) (*.p16 y.im y.im)))))>
0.392 * * * * [progress]: [ 51 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (*.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.392 * * * * [progress]: [ 52 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (posit16->quire16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))))>
0.392 * * * * [progress]: [ 53 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) (*.p16 y.im y.im) (real->posit16 1.0)))))>
0.392 * * * * [progress]: [ 54 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
0.392 * * * * [progress]: [ 55 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (real->posit16 0.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.392 * * * * [progress]: [ 56 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 0.0))))>
0.392 * * * * [progress]: [ 57 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (-.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 0.0))))>
0.392 * * * * [progress]: [ 58 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (*.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))>
0.392 * * * * [progress]: [ 59 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (*.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 1.0))))>
0.392 * * * * [progress]: [ 60 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 1.0))))>
0.392 * * * * [progress]: [ 61 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re))))>
0.392 * * * * [progress]: [ 62 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 63 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.392 * * * * [progress]: [ 64 / 64 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))>
0.393 * [simplify]: Simplifying:
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (*.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (*.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.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 x.im y.re) (real->posit16 0.0))
  (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (-.p16 (real->posit16 0.0) (*.p16 x.re y.im))
  (+.p16 (real->posit16 0.0) (*.p16 x.re y.im))
  (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (neg.p16 (*.p16 x.re y.im))
  (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im)))
  (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) (*.p16 x.re y.im) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.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 y.re y.re) (real->posit16 0.0))
  (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))
  (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))
  (+.p16 (real->posit16 0.0) (*.p16 y.im y.im))
  (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))
  (-.p16 (real->posit16 0.0) (*.p16 y.im y.im))
  (real->posit16 1.0)
  (posit16->quire16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) (*.p16 y.im y.im) (real->posit16 1.0))
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))
0.393 * * [simplify]: iteration 0: 42 enodes
0.402 * * [simplify]: iteration 1: 76 enodes
0.419 * * [simplify]: iteration 2: 345 enodes
0.608 * * [simplify]: iteration 3: 2005 enodes
1.189 * * [simplify]: iteration complete: 2005 enodes
1.190 * * [simplify]: Extracting #0: cost 23 inf + 0
1.192 * * [simplify]: Extracting #1: cost 352 inf + 0
1.201 * * [simplify]: Extracting #2: cost 727 inf + 6067
1.216 * * [simplify]: Extracting #3: cost 611 inf + 257198
1.258 * * [simplify]: Extracting #4: cost 123 inf + 645943
1.315 * * [simplify]: Extracting #5: cost 2 inf + 753610
1.366 * * [simplify]: Extracting #6: cost 0 inf + 757540
1.397 * [simplify]: Simplified to:
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (/.p16 (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)) (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (/.p16 (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)) (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (*.p16 (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)) (+.p16 (*.p16 y.im x.re) (*.p16 y.re x.im)))
  (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.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 y.re x.im)
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (neg.p16 (*.p16 y.im x.re))
  (*.p16 y.im x.re)
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (neg.p16 (*.p16 y.im x.re))
  (*.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im x.re) (*.p16 y.re x.im)))
  (+.p16 (*.p16 y.im x.re) (*.p16 y.re x.im))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) (*.p16 y.im x.re) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.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 y.re y.re)
  (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re))
  (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re))
  (*.p16 y.im y.im)
  (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re))
  (neg.p16 (*.p16 y.im y.im))
  (real->posit16 1.0)
  (posit16->quire16 (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) (*.p16 y.im y.im) (real->posit16 1.0))
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (+.p16 (*.p16 y.im y.im) (*.p16 y.re y.re)))
1.400 * * * [progress]: adding candidates to table
3.133 * * [progress]: iteration 2 / 4
3.133 * * * [progress]: picking best candidate
3.200 * * * * [pick]: Picked  #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.201 * * * [progress]: localizing error
3.407 * * * [progress]: generating rewritten candidates
3.407 * * * * [progress]: [ 1 / 3 ] rewriting at (2 2 1)
3.408 * * * * [progress]: [ 2 / 3 ] rewriting at (2)
3.411 * * * * [progress]: [ 3 / 3 ] rewriting at (2 1)
3.417 * * * [progress]: generating series expansions
3.417 * * * * [progress]: [ 1 / 3 ] generating series at (2 2 1)
3.417 * * * * [progress]: [ 2 / 3 ] generating series at (2)
3.417 * * * * [progress]: [ 3 / 3 ] generating series at (2 1)
3.417 * * * [progress]: simplifying candidates
3.417 * * * * [progress]: [ 1 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.417 * * * * [progress]: [ 2 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.417 * * * * [progress]: [ 3 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
3.417 * * * * [progress]: [ 4 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))>
3.417 * * * * [progress]: [ 5 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))>
3.417 * * * * [progress]: [ 6 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))))>
3.417 * * * * [progress]: [ 7 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
3.417 * * * * [progress]: [ 8 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))>
3.417 * * * * [progress]: [ 9 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))))>
3.418 * * * * [progress]: [ 10 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 11 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 12 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 13 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))))>
3.418 * * * * [progress]: [ 14 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 15 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 16 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))))>
3.418 * * * * [progress]: [ 17 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 18 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 19 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
3.418 * * * * [progress]: [ 20 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (quire16->posit16 (posit16->quire16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>
3.418 * * * * [progress]: [ 21 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (real->posit16 0.0) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 22 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 0.0)))>
3.418 * * * * [progress]: [ 23 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (-.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 0.0)))>
3.418 * * * * [progress]: [ 24 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
3.418 * * * * [progress]: [ 25 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
3.418 * * * * [progress]: [ 26 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
3.419 * * * * [progress]: [ 27 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (-.p16 (*.p16 x.im y.re) (real->posit16 0.0)) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 28 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 29 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 30 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (*.p16 x.im y.re) (-.p16 (real->posit16 0.0) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 31 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (+.p16 (real->posit16 0.0) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 32 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 33 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (*.p16 x.im y.re) (neg.p16 (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 34 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 35 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 36 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (posit16->quire16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 37 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) (*.p16 x.re y.im) (real->posit16 1.0))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 38 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 39 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (real->posit16 0.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 40 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (+.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 41 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 0.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 42 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (*.p16 (real->posit16 1.0) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.419 * * * * [progress]: [ 43 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (*.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.420 * * * * [progress]: [ 44 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.420 * * * * [progress]: [ 45 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.420 * * * * [progress]: [ 46 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.420 * * * * [progress]: [ 47 / 47 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
3.421 * [simplify]: Simplifying:
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.p16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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 x.im y.re) (real->posit16 0.0))
  (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (-.p16 (real->posit16 0.0) (*.p16 x.re y.im))
  (+.p16 (real->posit16 0.0) (*.p16 x.re y.im))
  (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (neg.p16 (*.p16 x.re y.im))
  (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im)))
  (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) (*.p16 x.re y.im) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.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)
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)
3.422 * * [simplify]: iteration 0: 36 enodes
3.433 * * [simplify]: iteration 1: 65 enodes
3.457 * * [simplify]: iteration 2: 310 enodes
3.815 * * [simplify]: iteration 3: 1362 enodes
4.197 * * [simplify]: iteration 4: 2013 enodes
4.585 * * [simplify]: iteration complete: 2013 enodes
4.585 * * [simplify]: Extracting #0: cost 18 inf + 0
4.586 * * [simplify]: Extracting #1: cost 201 inf + 0
4.588 * * [simplify]: Extracting #2: cost 336 inf + 2581
4.606 * * [simplify]: Extracting #3: cost 469 inf + 76015
4.630 * * [simplify]: Extracting #4: cost 181 inf + 300888
4.672 * * [simplify]: Extracting #5: cost 10 inf + 435351
4.713 * * [simplify]: Extracting #6: cost 0 inf + 442942
4.738 * [simplify]: Simplified to:
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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 y.re x.im)
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (neg.p16 (*.p16 y.im x.re))
  (*.p16 y.im x.re)
  (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (neg.p16 (*.p16 y.im x.re))
  (*.p16 (+.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (+.p16 (*.p16 y.re x.im) (*.p16 y.im x.re))
  (real->posit16 1.0)
  (posit16->quire16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)))
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) (*.p16 y.im x.re) (real->posit16 1.0))
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.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)
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)
  (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)
4.741 * * * [progress]: adding candidates to table
6.595 * * [progress]: iteration 3 / 4
6.595 * * * [progress]: picking best candidate
6.677 * * * * [pick]: Picked  #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
6.678 * * * [progress]: localizing error
6.926 * * * [progress]: generating rewritten candidates
6.927 * * * * [progress]: [ 1 / 3 ] rewriting at (2 1 1)
6.927 * * * * [progress]: [ 2 / 3 ] rewriting at (2 2 1)
6.927 * * * * [progress]: [ 3 / 3 ] rewriting at (2)
6.929 * * * [progress]: generating series expansions
6.929 * * * * [progress]: [ 1 / 3 ] generating series at (2 1 1)
6.929 * * * * [progress]: [ 2 / 3 ] generating series at (2 2 1)
6.929 * * * * [progress]: [ 3 / 3 ] generating series at (2)
6.929 * * * [progress]: simplifying candidates
6.929 * * * * [progress]: [ 1 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
6.929 * * * * [progress]: [ 2 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
6.930 * * * * [progress]: [ 3 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
6.930 * * * * [progress]: [ 4 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
6.930 * * * * [progress]: [ 5 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
6.930 * * * * [progress]: [ 6 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))))>
6.930 * * * * [progress]: [ 7 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
6.930 * * * * [progress]: [ 8 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))))>
6.930 * * * * [progress]: [ 9 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 10 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 11 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 12 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))))>
6.930 * * * * [progress]: [ 13 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 14 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 15 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))))>
6.930 * * * * [progress]: [ 16 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 17 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 18 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
6.930 * * * * [progress]: [ 19 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (quire16->posit16 (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>
6.930 * * * * [progress]: [ 20 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (real->posit16 0.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 21 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 0.0)))>
6.930 * * * * [progress]: [ 22 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (-.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 0.0)))>
6.930 * * * * [progress]: [ 23 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))>
6.930 * * * * [progress]: [ 24 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
6.930 * * * * [progress]: [ 25 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (real->posit16 1.0)))>
6.930 * * * * [progress]: [ 26 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
6.930 * * * * [progress]: [ 27 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
6.930 * * * * [progress]: [ 28 / 28 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))>
6.931 * [simplify]: Simplifying:
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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)
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)
  (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)
6.931 * * [simplify]: iteration 0: 24 enodes
6.938 * * [simplify]: iteration 1: 26 enodes
6.943 * * [simplify]: iteration 2: 58 enodes
6.971 * * [simplify]: iteration 3: 75 enodes
6.981 * * [simplify]: iteration 4: 85 enodes
6.990 * * [simplify]: iteration 5: 94 enodes
6.998 * * [simplify]: iteration 6: 101 enodes
7.008 * * [simplify]: iteration 7: 102 enodes
7.015 * * [simplify]: iteration complete: 102 enodes
7.015 * * [simplify]: Extracting #0: cost 9 inf + 0
7.015 * * [simplify]: Extracting #1: cost 16 inf + 0
7.015 * * [simplify]: Extracting #2: cost 14 inf + 4
7.015 * * [simplify]: Extracting #3: cost 15 inf + 6
7.015 * * [simplify]: Extracting #4: cost 12 inf + 329
7.016 * * [simplify]: Extracting #5: cost 8 inf + 1616
7.016 * * [simplify]: Extracting #6: cost 2 inf + 5198
7.018 * * [simplify]: Extracting #7: cost 0 inf + 7366
7.020 * [simplify]: Simplified to:
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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)
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)
  (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)
7.024 * * * [progress]: adding candidates to table
8.393 * * [progress]: iteration 4 / 4
8.393 * * * [progress]: picking best candidate
8.492 * * * * [pick]: Picked  #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.492 * * * [progress]: localizing error
8.900 * * * [progress]: generating rewritten candidates
8.900 * * * * [progress]: [ 1 / 4 ] rewriting at (2 2 2 1)
8.901 * * * * [progress]: [ 2 / 4 ] rewriting at (2 2 1 1)
8.901 * * * * [progress]: [ 3 / 4 ] rewriting at (2 2)
8.903 * * * * [progress]: [ 4 / 4 ] rewriting at (2)
8.906 * * * [progress]: generating series expansions
8.906 * * * * [progress]: [ 1 / 4 ] generating series at (2 2 2 1)
8.906 * * * * [progress]: [ 2 / 4 ] generating series at (2 2 1 1)
8.907 * * * * [progress]: [ 3 / 4 ] generating series at (2 2)
8.907 * * * * [progress]: [ 4 / 4 ] generating series at (2)
8.907 * * * [progress]: simplifying candidates
8.907 * * * * [progress]: [ 1 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.907 * * * * [progress]: [ 2 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.907 * * * * [progress]: [ 3 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.907 * * * * [progress]: [ 4 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>
8.907 * * * * [progress]: [ 5 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>
8.907 * * * * [progress]: [ 6 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0)))))>
8.907 * * * * [progress]: [ 7 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.907 * * * * [progress]: [ 8 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (*.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0)))))>
8.907 * * * * [progress]: [ 9 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 10 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 11 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 12 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.907 * * * * [progress]: [ 13 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 14 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 15 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.907 * * * * [progress]: [ 16 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 17 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 18 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))>
8.907 * * * * [progress]: [ 19 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (quire16->posit16 (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))))>
8.907 * * * * [progress]: [ 20 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (+.p16 (real->posit16 0.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.907 * * * * [progress]: [ 21 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (+.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 0.0))))>
8.907 * * * * [progress]: [ 22 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (-.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 0.0))))>
8.908 * * * * [progress]: [ 23 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.908 * * * * [progress]: [ 24 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 25 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 26 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (real->posit16 1.0)))>
8.908 * * * * [progress]: [ 27 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 28 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 29 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 30 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 31 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 32 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 33 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 34 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 35 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 36 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 37 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.908 * * * * [progress]: [ 38 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (real->posit16 1.0)))>
8.908 * * * * [progress]: [ 39 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 40 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 41 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 42 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))>
8.908 * * * * [progress]: [ 43 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 44 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.908 * * * * [progress]: [ 45 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.908 * * * * [progress]: [ 46 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.908 * * * * [progress]: [ 47 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 48 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 49 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.909 * * * * [progress]: [ 50 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 51 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 52 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.909 * * * * [progress]: [ 53 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 54 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 55 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))>
8.909 * * * * [progress]: [ 56 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 57 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.909 * * * * [progress]: [ 58 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.909 * * * * [progress]: [ 59 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 60 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 61 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 62 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.909 * * * * [progress]: [ 63 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 64 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 65 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.909 * * * * [progress]: [ 66 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 67 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 68 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))>
8.909 * * * * [progress]: [ 69 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.909 * * * * [progress]: [ 70 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.909 * * * * [progress]: [ 71 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.910 * * * * [progress]: [ 72 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 73 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 74 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 75 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.910 * * * * [progress]: [ 76 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 77 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 78 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))))>
8.910 * * * * [progress]: [ 79 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 80 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 81 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))))>
8.910 * * * * [progress]: [ 82 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (real->posit16 1.0)) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 83 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (/.p16 (real->posit16 1.0) (real->posit16 1.0))))>
8.910 * * * * [progress]: [ 84 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (quire16->posit16 (posit16->quire16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))))>
8.910 * * * * [progress]: [ 85 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (real->posit16 0.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 86 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (+.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (real->posit16 0.0)))>
8.910 * * * * [progress]: [ 87 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (-.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (real->posit16 0.0)))>
8.910 * * * * [progress]: [ 88 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))))>
8.910 * * * * [progress]: [ 89 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (real->posit16 1.0)))>
8.910 * * * * [progress]: [ 90 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))) (real->posit16 1.0)))>
8.910 * * * * [progress]: [ 91 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.910 * * * * [progress]: [ 92 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.910 * * * * [progress]: [ 93 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.910 * * * * [progress]: [ 94 / 94 ] simplifiying candidate #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))>
8.912 * [simplify]: Simplifying:
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (*.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.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 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.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) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.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) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))
  (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))
  (/.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (*.p16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (real->posit16 1.0))
  (real->posit16 1.0)
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.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 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.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 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (real->posit16 1.0)))
  (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.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 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))))
  (/.p16 (real->posit16 1.0) (real->posit16 1.0))
  (posit16->quire16 (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.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 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))
8.913 * * [simplify]: iteration 0: 32 enodes
8.923 * * [simplify]: iteration 1: 45 enodes
8.938 * * [simplify]: iteration 2: 99 enodes
9.008 * * [simplify]: iteration 3: 587 enodes
9.707 * * [simplify]: iteration 4: 997 enodes
9.731 * * [simplify]: iteration 5: 1045 enodes
9.742 * * [simplify]: iteration 6: 1053 enodes
9.750 * * [simplify]: iteration complete: 1053 enodes
9.750 * * [simplify]: Extracting #0: cost 10 inf + 0
9.750 * * [simplify]: Extracting #1: cost 14 inf + 0
9.750 * * [simplify]: Extracting #2: cost 15 inf + 3
9.751 * * [simplify]: Extracting #3: cost 14 inf + 6
9.751 * * [simplify]: Extracting #4: cost 16 inf + 6
9.751 * * [simplify]: Extracting #5: cost 13 inf + 329
9.751 * * [simplify]: Extracting #6: cost 7 inf + 2262
9.752 * * [simplify]: Extracting #7: cost 4 inf + 4433
9.753 * * [simplify]: Extracting #8: cost 1 inf + 7366
9.754 * * [simplify]: Extracting #9: cost 0 inf + 8450
9.757 * [simplify]: Simplified to:
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.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 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (real->posit16 1.0)
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (real->posit16 1.0)
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
  (real->posit16 1.0)
  (posit16->quire16 (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.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 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
  (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im)))
9.774 * * * [progress]: adding candidates to table
15.269 * [progress]: [Phase 3 of 3] Extracting.
15.269 * * [regime]: Finding splitpoints for: (#<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>)
15.273 * * * [regime-changes]: Trying 4 branch expressions: (y.im y.re x.im x.re)
15.273 * * * * [regimes]: Trying to branch on y.im from (#<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>)
15.726 * * * * [regimes]: Trying to branch on y.re from (#<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>)
16.167 * * * * [regimes]: Trying to branch on x.im from (#<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>)
16.624 * * * * [regimes]: Trying to branch on x.re from (#<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (-.p16 (*.p16 (*.p16 x.im y.re) (*.p16 x.im y.re)) (*.p16 (*.p16 x.re y.im) (*.p16 x.re y.im))) (*.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (+.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (-.p16 (*.p16 y.re x.im) (*.p16 y.im x.re)) (/.p16 (real->posit16 1.0) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im)) (-.p16 (*.p16 x.im y.re) (*.p16 x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 y.re x.im)) x.re y.im))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (*.p16 (/.p16 (real->posit16 1.0) (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im))) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))))> #<alt (λ (x.re x.im y.re y.im) (/.p16 (real->posit16 1.0) (/.p16 (real->posit16 1.0) (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im))))))>)
17.066 * * * [regime]: Found split indices: #<option (#s(si 1 256))>
17.066 * [simplify]: Simplifying:
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
17.066 * * [simplify]: iteration 0: 13 enodes
17.067 * * [simplify]: iteration complete: 13 enodes
17.067 * * [simplify]: Extracting #0: cost 1 inf + 0
17.067 * * [simplify]: Extracting #1: cost 3 inf + 0
17.067 * * [simplify]: Extracting #2: cost 5 inf + 0
17.067 * * [simplify]: Extracting #3: cost 9 inf + 0
17.068 * * [simplify]: Extracting #4: cost 9 inf + 2
17.068 * * [simplify]: Extracting #5: cost 11 inf + 2
17.068 * * [simplify]: Extracting #6: cost 9 inf + 4
17.068 * * [simplify]: Extracting #7: cost 5 inf + 1290
17.068 * * [simplify]: Extracting #8: cost 1 inf + 2582
17.068 * * [simplify]: Extracting #9: cost 0 inf + 3666
17.069 * [simplify]: Simplified to:
  (/.p16 (quire16->posit16 (quire16-mul-sub (posit16->quire16 (*.p16 x.im y.re)) x.re y.im)) (quire16->posit16 (quire16-mul-add (posit16->quire16 (*.p16 y.re y.re)) y.im y.im)))
17.069 * * * * [points]: Sampling 8000 additional inputs, on iter 0 have 0 / 8000
17.150 * * * * [points]: Computing exacts on every 500 of 8000 points to ramp up precision
17.152 * * * * [points]: Setting MPFR precision to 64
17.154 * * * * [points]: Setting MPFR precision to 320
17.156 * * * * [points]: Computing exacts on every 250 of 8000 points to ramp up precision
17.159 * * * * [points]: Setting MPFR precision to 64
17.163 * * * * [points]: Setting MPFR precision to 320
17.167 * * * * [points]: Computing exacts on every 125 of 8000 points to ramp up precision
17.169 * * * * [points]: Setting MPFR precision to 64
17.196 * * * * [points]: Setting MPFR precision to 320
17.205 * * * * [points]: Computing exacts on every 62 of 8000 points to ramp up precision
17.207 * * * * [points]: Setting MPFR precision to 64
17.223 * * * * [points]: Setting MPFR precision to 320
17.240 * * * * [points]: Computing exacts on every 31 of 8000 points to ramp up precision
17.243 * * * * [points]: Setting MPFR precision to 64
17.278 * * * * [points]: Setting MPFR precision to 320
17.311 * * * * [points]: Computing exacts on every 15 of 8000 points to ramp up precision
17.314 * * * * [points]: Setting MPFR precision to 64
17.377 * * * * [points]: Setting MPFR precision to 320
17.496 * * * * [points]: Computing exacts on every 7 of 8000 points to ramp up precision
17.499 * * * * [points]: Setting MPFR precision to 64
17.629 * * * * [points]: Setting MPFR precision to 320
17.755 * * * * [points]: Computing exacts on every 3 of 8000 points to ramp up precision
17.756 * * * * [points]: Setting MPFR precision to 64
18.034 * * * * [points]: Setting MPFR precision to 320
18.354 * * * * [points]: Computing exacts for 8000 points
18.356 * * * * [points]: Setting MPFR precision to 64
19.451 * * * * [points]: Setting MPFR precision to 320
20.859 * * * * [points]: Filtering points with unrepresentable outputs
20.958 * * * * [points]: Sampled 8000 points with exact outputs
29.450 * [regime-testing]: Baseline error score: 1.0345780756754088
29.453 * [regime-testing]: Oracle error score: 0.6179634412811902
29.462 * [regime-testing]: End program error score: 1.0345780756754088