(FPCore (x) :precision binary64 (sqrt (* 2.0 (pow x 2.0))))
(FPCore (x) :precision binary64 (hypot x x))
double code(double x) {
return sqrt((2.0 * pow(x, 2.0)));
}
double code(double x) {
return hypot(x, x);
}
public static double code(double x) {
return Math.sqrt((2.0 * Math.pow(x, 2.0)));
}
public static double code(double x) {
return Math.hypot(x, x);
}
def code(x): return math.sqrt((2.0 * math.pow(x, 2.0)))
def code(x): return math.hypot(x, x)
function code(x) return sqrt(Float64(2.0 * (x ^ 2.0))) end
function code(x) return hypot(x, x) end
function tmp = code(x) tmp = sqrt((2.0 * (x ^ 2.0))); end
function tmp = code(x) tmp = hypot(x, x); end
code[x_] := N[Sqrt[N[(2.0 * N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
code[x_] := N[Sqrt[x ^ 2 + x ^ 2], $MachinePrecision]
\sqrt{2 \cdot {x}^{2}}
\mathsf{hypot}\left(x, x\right)
Results
Initial program 30.4
Simplified30.4
[Start]30.4 | \[ \sqrt{2 \cdot {x}^{2}}
\] |
|---|---|
unpow2 [=>]30.4 | \[ \sqrt{2 \cdot \color{blue}{\left(x \cdot x\right)}}
\] |
Applied egg-rr45.8
Simplified0.0
[Start]45.8 | \[ \left(1 + \sqrt{2 \cdot \left(x \cdot x\right)}\right) - 1
\] |
|---|---|
+-commutative [=>]45.8 | \[ \color{blue}{\left(\sqrt{2 \cdot \left(x \cdot x\right)} + 1\right)} - 1
\] |
associate--l+ [=>]30.4 | \[ \color{blue}{\sqrt{2 \cdot \left(x \cdot x\right)} + \left(1 - 1\right)}
\] |
metadata-eval [=>]30.4 | \[ \sqrt{2 \cdot \left(x \cdot x\right)} + \color{blue}{0}
\] |
+-rgt-identity [=>]30.4 | \[ \color{blue}{\sqrt{2 \cdot \left(x \cdot x\right)}}
\] |
associate-*r* [=>]30.4 | \[ \sqrt{\color{blue}{\left(2 \cdot x\right) \cdot x}}
\] |
count-2 [<=]30.4 | \[ \sqrt{\color{blue}{\left(x + x\right)} \cdot x}
\] |
*-commutative [<=]30.4 | \[ \sqrt{\color{blue}{x \cdot \left(x + x\right)}}
\] |
distribute-lft-in [=>]30.4 | \[ \sqrt{\color{blue}{x \cdot x + x \cdot x}}
\] |
hypot-def [=>]0.0 | \[ \color{blue}{\mathsf{hypot}\left(x, x\right)}
\] |
Final simplification0.0
herbie shell --seed 2023011
(FPCore (x)
:name "sqrt D (should all be same)"
:precision binary64
(sqrt (* 2.0 (pow x 2.0))))