Average Error: 37.3 → 5.8
Time: 49.9s
Precision: 64
Internal Precision: 3648
\[0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\]
↓
\[\begin{array}{l}
\mathbf{if}\;0.5 \cdot \sqrt{2.0 \cdot (e^{\log_* (1 + \left(re + \sqrt{re^2 + im^2}^*\right))} - 1)^*} \le 1.434644772517729 \cdot 10^{-150}:\\
\;\;\;\;0.5 \cdot \frac{\sqrt{2.0 \cdot \left(im \cdot im\right)}}{\sqrt{\sqrt{re^2 + im^2}^* - re}}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{(\left(\sqrt{re^2 + im^2}^*\right) \cdot 2.0 + \left(re \cdot 2.0\right))_*}\\
\end{array}\]
Target
| Original | 37.3 |
|---|
| Target | 32.4 |
|---|
| Herbie | 5.8 |
|---|
\[\begin{array}{l}
\mathbf{if}\;re \lt 0:\\
\;\;\;\;0.5 \cdot \left(\sqrt{2} \cdot \sqrt{\frac{im \cdot im}{\sqrt{re \cdot re + im \cdot im} - re}}\right)\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\\
\end{array}\]
Derivation
- Split input into 2 regimes
if (* 0.5 (sqrt (* 2.0 (expm1 (log1p (+ re (hypot re im))))))) < 1.434644772517729e-150
Initial program 59.5
\[0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\]
- Using strategy
rm Applied flip-+59.4
\[\leadsto 0.5 \cdot \sqrt{2.0 \cdot \color{blue}{\frac{\sqrt{re \cdot re + im \cdot im} \cdot \sqrt{re \cdot re + im \cdot im} - re \cdot re}{\sqrt{re \cdot re + im \cdot im} - re}}}\]
Applied associate-*r/59.4
\[\leadsto 0.5 \cdot \sqrt{\color{blue}{\frac{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} \cdot \sqrt{re \cdot re + im \cdot im} - re \cdot re\right)}{\sqrt{re \cdot re + im \cdot im} - re}}}\]
Applied sqrt-div59.4
\[\leadsto 0.5 \cdot \color{blue}{\frac{\sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} \cdot \sqrt{re \cdot re + im \cdot im} - re \cdot re\right)}}{\sqrt{\sqrt{re \cdot re + im \cdot im} - re}}}\]
Applied simplify38.0
\[\leadsto 0.5 \cdot \frac{\color{blue}{\sqrt{2.0 \cdot \left(im \cdot im\right)}}}{\sqrt{\sqrt{re \cdot re + im \cdot im} - re}}\]
Applied simplify22.5
\[\leadsto 0.5 \cdot \frac{\sqrt{2.0 \cdot \left(im \cdot im\right)}}{\color{blue}{\sqrt{\sqrt{re^2 + im^2}^* - re}}}\]
if 1.434644772517729e-150 < (* 0.5 (sqrt (* 2.0 (expm1 (log1p (+ re (hypot re im)))))))
Initial program 30.0
\[0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\]
Applied simplify0.3
\[\leadsto \color{blue}{0.5 \cdot \sqrt{(\left(\sqrt{re^2 + im^2}^*\right) \cdot 2.0 + \left(re \cdot 2.0\right))_*}}\]
- Recombined 2 regimes into one program.
Runtime
herbie shell --seed '#(1071852389 864846987 1238109217 3425890003 4124793586 650694553)' +o rules:numerics
(FPCore (re im)
:name "math.sqrt on complex, real part"
:herbie-target
(if (< re 0) (* 0.5 (* (sqrt 2) (sqrt (/ (* im im) (- (sqrt (+ (* re re) (* im im))) re))))) (* 0.5 (sqrt (* 2.0 (+ (sqrt (+ (* re re) (* im im))) re)))))
(* 0.5 (sqrt (* 2.0 (+ (sqrt (+ (* re re) (* im im))) re)))))