* [misc]progress:  [Phase 1 of 3] Setting up.
* * * [misc]progress:  [1/2] Preparing points
* * * [misc]progress:  [2/2] Setting up program.
* [enter]simplify:  Simplifying (+ (* x.re y.im) (* x.im y.re))
* * [misc]simplify:  iters left: 4 (7 enodes)
* * [misc]simplify:  iters left: 3 (11 enodes)
* * [misc]simplify:  iters left: 2 (14 enodes)
* [exit]simplify:  Simplified to (fma y.im x.re (* y.re x.im))
* [misc]progress:  [Phase 2 of 3] Improving.
* * [misc]progress:  iteration 1 / 2
* * * [misc]progress:  picking best candidate
* * * * [misc]pick:  Picked  #<alt-delta (λ (x.re x.im y.re y.im) (fma y.im x.re (* y.re x.im)))>
* * * [misc]progress:  localizing error
* * * [misc]progress:  generating series expansions
* * * [misc]progress:  generating rewritten candidates
* * * [misc]progress:  simplifying candidates
* * * [misc]progress:  adding candidates to table
* [misc]progress:  [Phase 3 of 3] Extracting.
* * [misc]regime-changes:  Finding splitpoints for: (#<alt-delta (λ (x.re x.im y.re y.im) (fma y.im x.re (* y.re x.im)))>)
* [misc]regimes:  Found splitpoints: (#s(sp 0 (+ (* x.re y.im) (* x.im y.re)) +inf.0)) , with alts (#<alt-delta (λ (x.re x.im y.re y.im) (fma y.im x.re (* y.re x.im)))>)
* [enter]simplify:  Simplifying (* y.re x.im)
* * [misc]simplify:  iters left: 2 (3 enodes)
* * [misc]simplify:  iters left: 1 (4 enodes)
* [exit]simplify:  Simplified to (* x.im y.re)
* [exit]simplify:  Simplified to (* x.im y.re)