(FPCore (a rand) :precision binary64 (* (- a (/ 1.0 3.0)) (+ 1.0 (* (/ 1.0 (sqrt (* 9.0 (- a (/ 1.0 3.0))))) rand))))
(FPCore (a rand) :precision binary64 (+ a (+ -0.3333333333333333 (/ rand (/ (sqrt (+ (* a 9.0) -3.0)) (+ a -0.3333333333333333))))))
double code(double a, double rand) {
return (a - (1.0 / 3.0)) * (1.0 + ((1.0 / sqrt((9.0 * (a - (1.0 / 3.0))))) * rand));
}
double code(double a, double rand) {
return a + (-0.3333333333333333 + (rand / (sqrt(((a * 9.0) + -3.0)) / (a + -0.3333333333333333))));
}
real(8) function code(a, rand)
real(8), intent (in) :: a
real(8), intent (in) :: rand
code = (a - (1.0d0 / 3.0d0)) * (1.0d0 + ((1.0d0 / sqrt((9.0d0 * (a - (1.0d0 / 3.0d0))))) * rand))
end function
real(8) function code(a, rand)
real(8), intent (in) :: a
real(8), intent (in) :: rand
code = a + ((-0.3333333333333333d0) + (rand / (sqrt(((a * 9.0d0) + (-3.0d0))) / (a + (-0.3333333333333333d0)))))
end function
public static double code(double a, double rand) {
return (a - (1.0 / 3.0)) * (1.0 + ((1.0 / Math.sqrt((9.0 * (a - (1.0 / 3.0))))) * rand));
}
public static double code(double a, double rand) {
return a + (-0.3333333333333333 + (rand / (Math.sqrt(((a * 9.0) + -3.0)) / (a + -0.3333333333333333))));
}
def code(a, rand): return (a - (1.0 / 3.0)) * (1.0 + ((1.0 / math.sqrt((9.0 * (a - (1.0 / 3.0))))) * rand))
def code(a, rand): return a + (-0.3333333333333333 + (rand / (math.sqrt(((a * 9.0) + -3.0)) / (a + -0.3333333333333333))))
function code(a, rand) return Float64(Float64(a - Float64(1.0 / 3.0)) * Float64(1.0 + Float64(Float64(1.0 / sqrt(Float64(9.0 * Float64(a - Float64(1.0 / 3.0))))) * rand))) end
function code(a, rand) return Float64(a + Float64(-0.3333333333333333 + Float64(rand / Float64(sqrt(Float64(Float64(a * 9.0) + -3.0)) / Float64(a + -0.3333333333333333))))) end
function tmp = code(a, rand) tmp = (a - (1.0 / 3.0)) * (1.0 + ((1.0 / sqrt((9.0 * (a - (1.0 / 3.0))))) * rand)); end
function tmp = code(a, rand) tmp = a + (-0.3333333333333333 + (rand / (sqrt(((a * 9.0) + -3.0)) / (a + -0.3333333333333333)))); end
code[a_, rand_] := N[(N[(a - N[(1.0 / 3.0), $MachinePrecision]), $MachinePrecision] * N[(1.0 + N[(N[(1.0 / N[Sqrt[N[(9.0 * N[(a - N[(1.0 / 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * rand), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[a_, rand_] := N[(a + N[(-0.3333333333333333 + N[(rand / N[(N[Sqrt[N[(N[(a * 9.0), $MachinePrecision] + -3.0), $MachinePrecision]], $MachinePrecision] / N[(a + -0.3333333333333333), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\left(a - \frac{1}{3}\right) \cdot \left(1 + \frac{1}{\sqrt{9 \cdot \left(a - \frac{1}{3}\right)}} \cdot rand\right)
a + \left(-0.3333333333333333 + \frac{rand}{\frac{\sqrt{a \cdot 9 + -3}}{a + -0.3333333333333333}}\right)



Bits error versus a



Bits error versus rand
Results
Initial program 0.1
Simplified0.1
Applied egg-rr0.1
Applied egg-rr0.1
Applied egg-rr0.1
Taylor expanded in a around 0 0.1
Final simplification0.1
herbie shell --seed 2022169
(FPCore (a rand)
:name "Octave 3.8, oct_fill_randg"
:precision binary64
(* (- a (/ 1.0 3.0)) (+ 1.0 (* (/ 1.0 (sqrt (* 9.0 (- a (/ 1.0 3.0))))) rand))))