
(FPCore (x) :precision binary64 (- 1.0 (sqrt (* 0.5 (+ 1.0 (/ 1.0 (hypot 1.0 x)))))))
double code(double x) {
return 1.0 - sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x)))));
}
public static double code(double x) {
return 1.0 - Math.sqrt((0.5 * (1.0 + (1.0 / Math.hypot(1.0, x)))));
}
def code(x): return 1.0 - math.sqrt((0.5 * (1.0 + (1.0 / math.hypot(1.0, x)))))
function code(x) return Float64(1.0 - sqrt(Float64(0.5 * Float64(1.0 + Float64(1.0 / hypot(1.0, x)))))) end
function tmp = code(x) tmp = 1.0 - sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x))))); end
code[x_] := N[(1.0 - N[Sqrt[N[(0.5 * N[(1.0 + N[(1.0 / N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
1 - \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (- 1.0 (sqrt (* 0.5 (+ 1.0 (/ 1.0 (hypot 1.0 x)))))))
double code(double x) {
return 1.0 - sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x)))));
}
public static double code(double x) {
return 1.0 - Math.sqrt((0.5 * (1.0 + (1.0 / Math.hypot(1.0, x)))));
}
def code(x): return 1.0 - math.sqrt((0.5 * (1.0 + (1.0 / math.hypot(1.0, x)))))
function code(x) return Float64(1.0 - sqrt(Float64(0.5 * Float64(1.0 + Float64(1.0 / hypot(1.0, x)))))) end
function tmp = code(x) tmp = 1.0 - sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x))))); end
code[x_] := N[(1.0 - N[Sqrt[N[(0.5 * N[(1.0 + N[(1.0 / N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
1 - \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}
\end{array}
(FPCore (x)
:precision binary64
(if (<= (hypot 1.0 x) 2.0)
(fma
(pow x 4.0)
(- (* (* (fma -0.056243896484375 (* x x) 0.0673828125) x) x) 0.0859375)
(* 0.125 (* x x)))
(/
(+ (/ -0.5 (hypot 1.0 x)) 0.5)
(+ (sqrt (- 0.5 (/ -0.5 (sqrt (fma x x 1.0))))) 1.0))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = fma(pow(x, 4.0), (((fma(-0.056243896484375, (x * x), 0.0673828125) * x) * x) - 0.0859375), (0.125 * (x * x)));
} else {
tmp = ((-0.5 / hypot(1.0, x)) + 0.5) / (sqrt((0.5 - (-0.5 / sqrt(fma(x, x, 1.0))))) + 1.0);
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = fma((x ^ 4.0), Float64(Float64(Float64(fma(-0.056243896484375, Float64(x * x), 0.0673828125) * x) * x) - 0.0859375), Float64(0.125 * Float64(x * x))); else tmp = Float64(Float64(Float64(-0.5 / hypot(1.0, x)) + 0.5) / Float64(sqrt(Float64(0.5 - Float64(-0.5 / sqrt(fma(x, x, 1.0))))) + 1.0)); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[Power[x, 4.0], $MachinePrecision] * N[(N[(N[(N[(-0.056243896484375 * N[(x * x), $MachinePrecision] + 0.0673828125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision] - 0.0859375), $MachinePrecision] + N[(0.125 * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(-0.5 / N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision]), $MachinePrecision] + 0.5), $MachinePrecision] / N[(N[Sqrt[N[(0.5 - N[(-0.5 / N[Sqrt[N[(x * x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\mathsf{fma}\left({x}^{4}, \left(\mathsf{fma}\left(-0.056243896484375, x \cdot x, 0.0673828125\right) \cdot x\right) \cdot x - 0.0859375, 0.125 \cdot \left(x \cdot x\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{-0.5}{\mathsf{hypot}\left(1, x\right)} + 0.5}{\sqrt{0.5 - \frac{-0.5}{\sqrt{\mathsf{fma}\left(x, x, 1\right)}}} + 1}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites45.7%
Taylor expanded in x around 0
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
lower-fma.f64N/A
Applied rewrites100.0%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval98.5
Applied rewrites98.5%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.9%
lift-/.f64N/A
lift--.f64N/A
metadata-evalN/A
lift-pow.f64N/A
metadata-evalN/A
sqrt-pow2N/A
lift--.f64N/A
lift-/.f64N/A
lift-hypot.f64N/A
metadata-evalN/A
lift-+.f64N/A
lift-sqrt.f64N/A
Applied rewrites100.0%
lift-hypot.f64N/A
rem-square-sqrtN/A
lift-hypot.f64N/A
lift-hypot.f64N/A
lower-sqrt.f64N/A
lift-hypot.f64N/A
lift-hypot.f64N/A
rem-square-sqrtN/A
metadata-evalN/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
lower-fma.f64100.0
Applied rewrites100.0%
(FPCore (x)
:precision binary64
(let* ((t_0 (- 0.5 (/ (- (/ 0.25 (* x x)) 0.5) x))))
(if (<= (hypot 1.0 x) 2.0)
(fma
(pow x 4.0)
(- (* (* (fma -0.056243896484375 (* x x) 0.0673828125) x) x) 0.0859375)
(* 0.125 (* x x)))
(/ (- 1.0 t_0) (+ (sqrt t_0) 1.0)))))
double code(double x) {
double t_0 = 0.5 - (((0.25 / (x * x)) - 0.5) / x);
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = fma(pow(x, 4.0), (((fma(-0.056243896484375, (x * x), 0.0673828125) * x) * x) - 0.0859375), (0.125 * (x * x)));
} else {
tmp = (1.0 - t_0) / (sqrt(t_0) + 1.0);
}
return tmp;
}
function code(x) t_0 = Float64(0.5 - Float64(Float64(Float64(0.25 / Float64(x * x)) - 0.5) / x)) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = fma((x ^ 4.0), Float64(Float64(Float64(fma(-0.056243896484375, Float64(x * x), 0.0673828125) * x) * x) - 0.0859375), Float64(0.125 * Float64(x * x))); else tmp = Float64(Float64(1.0 - t_0) / Float64(sqrt(t_0) + 1.0)); end return tmp end
code[x_] := Block[{t$95$0 = N[(0.5 - N[(N[(N[(0.25 / N[(x * x), $MachinePrecision]), $MachinePrecision] - 0.5), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[Power[x, 4.0], $MachinePrecision] * N[(N[(N[(N[(-0.056243896484375 * N[(x * x), $MachinePrecision] + 0.0673828125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision] - 0.0859375), $MachinePrecision] + N[(0.125 * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 - t$95$0), $MachinePrecision] / N[(N[Sqrt[t$95$0], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 0.5 - \frac{\frac{0.25}{x \cdot x} - 0.5}{x}\\
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\mathsf{fma}\left({x}^{4}, \left(\mathsf{fma}\left(-0.056243896484375, x \cdot x, 0.0673828125\right) \cdot x\right) \cdot x - 0.0859375, 0.125 \cdot \left(x \cdot x\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1 - t\_0}{\sqrt{t\_0} + 1}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites45.7%
Taylor expanded in x around 0
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
lower-fma.f64N/A
Applied rewrites100.0%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval98.5
Applied rewrites98.5%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f64N/A
unpow2N/A
lower-*.f6497.2
Applied rewrites97.2%
lift--.f64N/A
flip--N/A
lower-/.f64N/A
Applied rewrites98.6%
(FPCore (x)
:precision binary64
(let* ((t_0 (- 0.5 (/ (- (/ 0.25 (* x x)) 0.5) x))))
(if (<= (hypot 1.0 x) 2.0)
(* (* (fma (- (* 0.0673828125 (* x x)) 0.0859375) (* x x) 0.125) x) x)
(/ (- 1.0 t_0) (+ (sqrt t_0) 1.0)))))
double code(double x) {
double t_0 = 0.5 - (((0.25 / (x * x)) - 0.5) / x);
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = (fma(((0.0673828125 * (x * x)) - 0.0859375), (x * x), 0.125) * x) * x;
} else {
tmp = (1.0 - t_0) / (sqrt(t_0) + 1.0);
}
return tmp;
}
function code(x) t_0 = Float64(0.5 - Float64(Float64(Float64(0.25 / Float64(x * x)) - 0.5) / x)) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(Float64(fma(Float64(Float64(0.0673828125 * Float64(x * x)) - 0.0859375), Float64(x * x), 0.125) * x) * x); else tmp = Float64(Float64(1.0 - t_0) / Float64(sqrt(t_0) + 1.0)); end return tmp end
code[x_] := Block[{t$95$0 = N[(0.5 - N[(N[(N[(0.25 / N[(x * x), $MachinePrecision]), $MachinePrecision] - 0.5), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(N[(N[(0.0673828125 * N[(x * x), $MachinePrecision]), $MachinePrecision] - 0.0859375), $MachinePrecision] * N[(x * x), $MachinePrecision] + 0.125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision], N[(N[(1.0 - t$95$0), $MachinePrecision] / N[(N[Sqrt[t$95$0], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 0.5 - \frac{\frac{0.25}{x \cdot x} - 0.5}{x}\\
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\left(\mathsf{fma}\left(0.0673828125 \cdot \left(x \cdot x\right) - 0.0859375, x \cdot x, 0.125\right) \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;\frac{1 - t\_0}{\sqrt{t\_0} + 1}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f64N/A
lower--.f64N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64100.0
Applied rewrites100.0%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval98.5
Applied rewrites98.5%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f64N/A
unpow2N/A
lower-*.f6497.2
Applied rewrites97.2%
lift--.f64N/A
flip--N/A
lower-/.f64N/A
Applied rewrites98.6%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (* (fma (- (* 0.0673828125 (* x x)) 0.0859375) (* x x) 0.125) x) x) (- 1.0 (sqrt (- 0.5 (/ (- (/ 0.25 (* x x)) 0.5) x))))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = (fma(((0.0673828125 * (x * x)) - 0.0859375), (x * x), 0.125) * x) * x;
} else {
tmp = 1.0 - sqrt((0.5 - (((0.25 / (x * x)) - 0.5) / x)));
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(Float64(fma(Float64(Float64(0.0673828125 * Float64(x * x)) - 0.0859375), Float64(x * x), 0.125) * x) * x); else tmp = Float64(1.0 - sqrt(Float64(0.5 - Float64(Float64(Float64(0.25 / Float64(x * x)) - 0.5) / x)))); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(N[(N[(0.0673828125 * N[(x * x), $MachinePrecision]), $MachinePrecision] - 0.0859375), $MachinePrecision] * N[(x * x), $MachinePrecision] + 0.125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision], N[(1.0 - N[Sqrt[N[(0.5 - N[(N[(N[(0.25 / N[(x * x), $MachinePrecision]), $MachinePrecision] - 0.5), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\left(\mathsf{fma}\left(0.0673828125 \cdot \left(x \cdot x\right) - 0.0859375, x \cdot x, 0.125\right) \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;1 - \sqrt{0.5 - \frac{\frac{0.25}{x \cdot x} - 0.5}{x}}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f64N/A
lower--.f64N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64100.0
Applied rewrites100.0%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval98.5
Applied rewrites98.5%
Taylor expanded in x around inf
lower-/.f64N/A
lower--.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f64N/A
unpow2N/A
lower-*.f6497.2
Applied rewrites97.2%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (* (fma (- (* 0.0673828125 (* x x)) 0.0859375) (* x x) 0.125) x) x) (- 1.0 (sqrt (+ (/ 0.5 x) 0.5)))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = (fma(((0.0673828125 * (x * x)) - 0.0859375), (x * x), 0.125) * x) * x;
} else {
tmp = 1.0 - sqrt(((0.5 / x) + 0.5));
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(Float64(fma(Float64(Float64(0.0673828125 * Float64(x * x)) - 0.0859375), Float64(x * x), 0.125) * x) * x); else tmp = Float64(1.0 - sqrt(Float64(Float64(0.5 / x) + 0.5))); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(N[(N[(0.0673828125 * N[(x * x), $MachinePrecision]), $MachinePrecision] - 0.0859375), $MachinePrecision] * N[(x * x), $MachinePrecision] + 0.125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision], N[(1.0 - N[Sqrt[N[(N[(0.5 / x), $MachinePrecision] + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\left(\mathsf{fma}\left(0.0673828125 \cdot \left(x \cdot x\right) - 0.0859375, x \cdot x, 0.125\right) \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;1 - \sqrt{\frac{0.5}{x} + 0.5}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f64N/A
lower--.f64N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64100.0
Applied rewrites100.0%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
Taylor expanded in x around inf
+-commutativeN/A
lower-+.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6497.0
Applied rewrites97.0%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (fma (* -0.0859375 (* x x)) x (* 0.125 x)) x) (- 1.0 (sqrt (+ (/ 0.5 x) 0.5)))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = fma((-0.0859375 * (x * x)), x, (0.125 * x)) * x;
} else {
tmp = 1.0 - sqrt(((0.5 / x) + 0.5));
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(fma(Float64(-0.0859375 * Float64(x * x)), x, Float64(0.125 * x)) * x); else tmp = Float64(1.0 - sqrt(Float64(Float64(0.5 / x) + 0.5))); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(-0.0859375 * N[(x * x), $MachinePrecision]), $MachinePrecision] * x + N[(0.125 * x), $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision], N[(1.0 - N[Sqrt[N[(N[(0.5 / x), $MachinePrecision] + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\mathsf{fma}\left(-0.0859375 \cdot \left(x \cdot x\right), x, 0.125 \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;1 - \sqrt{\frac{0.5}{x} + 0.5}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites45.7%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
+-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.9
Applied rewrites99.9%
Applied rewrites99.9%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
Taylor expanded in x around inf
+-commutativeN/A
lower-+.f64N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f6497.0
Applied rewrites97.0%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (fma (* -0.0859375 (* x x)) x (* 0.125 x)) x) (/ 0.5 (+ (sqrt 0.5) 1.0))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = fma((-0.0859375 * (x * x)), x, (0.125 * x)) * x;
} else {
tmp = 0.5 / (sqrt(0.5) + 1.0);
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(fma(Float64(-0.0859375 * Float64(x * x)), x, Float64(0.125 * x)) * x); else tmp = Float64(0.5 / Float64(sqrt(0.5) + 1.0)); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(-0.0859375 * N[(x * x), $MachinePrecision]), $MachinePrecision] * x + N[(0.125 * x), $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision], N[(0.5 / N[(N[Sqrt[0.5], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\mathsf{fma}\left(-0.0859375 \cdot \left(x \cdot x\right), x, 0.125 \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;\frac{0.5}{\sqrt{0.5} + 1}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites45.7%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
+-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.9
Applied rewrites99.9%
Applied rewrites99.9%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval98.5
Applied rewrites98.5%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.9%
lift-/.f64N/A
lift--.f64N/A
metadata-evalN/A
lift-pow.f64N/A
metadata-evalN/A
sqrt-pow2N/A
lift--.f64N/A
lift-/.f64N/A
lift-hypot.f64N/A
metadata-evalN/A
lift-+.f64N/A
lift-sqrt.f64N/A
Applied rewrites100.0%
Taylor expanded in x around inf
lower-/.f64N/A
+-commutativeN/A
lower-+.f64N/A
lower-sqrt.f6497.5
Applied rewrites97.5%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (* (fma -0.0859375 (* x x) 0.125) x) x) (/ 0.5 (+ (sqrt 0.5) 1.0))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = (fma(-0.0859375, (x * x), 0.125) * x) * x;
} else {
tmp = 0.5 / (sqrt(0.5) + 1.0);
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(Float64(fma(-0.0859375, Float64(x * x), 0.125) * x) * x); else tmp = Float64(0.5 / Float64(sqrt(0.5) + 1.0)); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(-0.0859375 * N[(x * x), $MachinePrecision] + 0.125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision], N[(0.5 / N[(N[Sqrt[0.5], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\left(\mathsf{fma}\left(-0.0859375, x \cdot x, 0.125\right) \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;\frac{0.5}{\sqrt{0.5} + 1}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
+-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.9
Applied rewrites99.9%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval98.5
Applied rewrites98.5%
lift--.f64N/A
flip3--N/A
lower-/.f64N/A
metadata-evalN/A
lower--.f64N/A
lift-sqrt.f64N/A
pow1/2N/A
pow-powN/A
lower-pow.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.9%
lift-/.f64N/A
lift--.f64N/A
metadata-evalN/A
lift-pow.f64N/A
metadata-evalN/A
sqrt-pow2N/A
lift--.f64N/A
lift-/.f64N/A
lift-hypot.f64N/A
metadata-evalN/A
lift-+.f64N/A
lift-sqrt.f64N/A
Applied rewrites100.0%
Taylor expanded in x around inf
lower-/.f64N/A
+-commutativeN/A
lower-+.f64N/A
lower-sqrt.f6497.5
Applied rewrites97.5%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (* (fma -0.0859375 (* x x) 0.125) x) x) (- 1.0 (sqrt 0.5))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = (fma(-0.0859375, (x * x), 0.125) * x) * x;
} else {
tmp = 1.0 - sqrt(0.5);
}
return tmp;
}
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(Float64(fma(-0.0859375, Float64(x * x), 0.125) * x) * x); else tmp = Float64(1.0 - sqrt(0.5)); end return tmp end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(N[(-0.0859375 * N[(x * x), $MachinePrecision] + 0.125), $MachinePrecision] * x), $MachinePrecision] * x), $MachinePrecision], N[(1.0 - N[Sqrt[0.5], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\left(\mathsf{fma}\left(-0.0859375, x \cdot x, 0.125\right) \cdot x\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;1 - \sqrt{0.5}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
Taylor expanded in x around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
+-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.9
Applied rewrites99.9%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
Taylor expanded in x around inf
Applied rewrites96.1%
(FPCore (x) :precision binary64 (if (<= (hypot 1.0 x) 2.0) (* (* x x) 0.125) (- 1.0 (sqrt 0.5))))
double code(double x) {
double tmp;
if (hypot(1.0, x) <= 2.0) {
tmp = (x * x) * 0.125;
} else {
tmp = 1.0 - sqrt(0.5);
}
return tmp;
}
public static double code(double x) {
double tmp;
if (Math.hypot(1.0, x) <= 2.0) {
tmp = (x * x) * 0.125;
} else {
tmp = 1.0 - Math.sqrt(0.5);
}
return tmp;
}
def code(x): tmp = 0 if math.hypot(1.0, x) <= 2.0: tmp = (x * x) * 0.125 else: tmp = 1.0 - math.sqrt(0.5) return tmp
function code(x) tmp = 0.0 if (hypot(1.0, x) <= 2.0) tmp = Float64(Float64(x * x) * 0.125); else tmp = Float64(1.0 - sqrt(0.5)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (hypot(1.0, x) <= 2.0) tmp = (x * x) * 0.125; else tmp = 1.0 - sqrt(0.5); end tmp_2 = tmp; end
code[x_] := If[LessEqual[N[Sqrt[1.0 ^ 2 + x ^ 2], $MachinePrecision], 2.0], N[(N[(x * x), $MachinePrecision] * 0.125), $MachinePrecision], N[(1.0 - N[Sqrt[0.5], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{hypot}\left(1, x\right) \leq 2:\\
\;\;\;\;\left(x \cdot x\right) \cdot 0.125\\
\mathbf{else}:\\
\;\;\;\;1 - \sqrt{0.5}\\
\end{array}
\end{array}
if (hypot.f64 #s(literal 1 binary64) x) < 2Initial program 45.6%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval45.6
Applied rewrites45.6%
Taylor expanded in x around 0
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
lower-*.f6499.1
Applied rewrites99.1%
if 2 < (hypot.f64 #s(literal 1 binary64) x) Initial program 98.5%
Taylor expanded in x around inf
Applied rewrites96.1%
(FPCore (x) :precision binary64 (* (* x x) 0.125))
double code(double x) {
return (x * x) * 0.125;
}
real(8) function code(x)
real(8), intent (in) :: x
code = (x * x) * 0.125d0
end function
public static double code(double x) {
return (x * x) * 0.125;
}
def code(x): return (x * x) * 0.125
function code(x) return Float64(Float64(x * x) * 0.125) end
function tmp = code(x) tmp = (x * x) * 0.125; end
code[x_] := N[(N[(x * x), $MachinePrecision] * 0.125), $MachinePrecision]
\begin{array}{l}
\\
\left(x \cdot x\right) \cdot 0.125
\end{array}
Initial program 69.4%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval69.4
Applied rewrites69.4%
Taylor expanded in x around 0
*-commutativeN/A
lower-*.f64N/A
unpow2N/A
lower-*.f6456.6
Applied rewrites56.6%
(FPCore (x) :precision binary64 (- 1.0 1.0))
double code(double x) {
return 1.0 - 1.0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 - 1.0d0
end function
public static double code(double x) {
return 1.0 - 1.0;
}
def code(x): return 1.0 - 1.0
function code(x) return Float64(1.0 - 1.0) end
function tmp = code(x) tmp = 1.0 - 1.0; end
code[x_] := N[(1.0 - 1.0), $MachinePrecision]
\begin{array}{l}
\\
1 - 1
\end{array}
Initial program 69.4%
lift-*.f64N/A
lift-+.f64N/A
distribute-lft-inN/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
lower--.f64N/A
metadata-evalN/A
metadata-evalN/A
lift-/.f64N/A
associate-*r/N/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
lower-/.f64N/A
metadata-eval69.4
Applied rewrites69.4%
Taylor expanded in x around 0
Applied rewrites25.9%
herbie shell --seed 2024344
(FPCore (x)
:name "Given's Rotation SVD example, simplified"
:precision binary64
(- 1.0 (sqrt (* 0.5 (+ 1.0 (/ 1.0 (hypot 1.0 x)))))))