(FPCore (p) :precision binary64 (/ (- 1.0 p) p))
(FPCore (p) :precision binary64 (/ (- 1.0 p) p))
double code(double p) { return (1.0 - p) / p; }
double code(double p) { return (1.0 - p) / p; }
real(8) function code(p) real(8), intent (in) :: p code = (1.0d0 - p) / p end function
real(8) function code(p) real(8), intent (in) :: p code = (1.0d0 - p) / p end function
public static double code(double p) { return (1.0 - p) / p; }
public static double code(double p) { return (1.0 - p) / p; }
def code(p): return (1.0 - p) / p
def code(p): return (1.0 - p) / p
function code(p) return Float64(Float64(1.0 - p) / p) end
function code(p) return Float64(Float64(1.0 - p) / p) end
function tmp = code(p) tmp = (1.0 - p) / p; end
function tmp = code(p) tmp = (1.0 - p) / p; end
code[p_] := N[(N[(1.0 - p), $MachinePrecision] / p), $MachinePrecision]
code[p_] := N[(N[(1.0 - p), $MachinePrecision] / p), $MachinePrecision]
\frac{1 - p}{p}
\frac{1 - p}{p}
Results
Initial program 0.0
Final simplification0.0
herbie shell --seed 1
(FPCore (p)
:name "(1-p)/p"
:precision binary64
:pre (and (<= 0.0 p) (<= p 1.0))
(/ (- 1.0 p) p))