Numeric.SpecFunctions:incompleteBetaApprox from math-functions-0.1.5.2, B

Specification

?
\[\begin{array}{l} \\ x \cdot e^{y \cdot \left(\log z - t\right) + a \cdot \left(\log \left(1 - z\right) - b\right)} \end{array} \]
(FPCore (x y z t a b)
 :precision binary64
 (* x (exp (+ (* y (- (log z) t)) (* a (- (log (- 1.0 z)) b))))))
double code(double x, double y, double z, double t, double a, double b) {
	return x * exp(((y * (log(z) - t)) + (a * (log((1.0 - z)) - b))));
}
real(8) function code(x, y, z, t, a, b)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    code = x * exp(((y * (log(z) - t)) + (a * (log((1.0d0 - z)) - b))))
end function
public static double code(double x, double y, double z, double t, double a, double b) {
	return x * Math.exp(((y * (Math.log(z) - t)) + (a * (Math.log((1.0 - z)) - b))));
}
def code(x, y, z, t, a, b):
	return x * math.exp(((y * (math.log(z) - t)) + (a * (math.log((1.0 - z)) - b))))
function code(x, y, z, t, a, b)
	return Float64(x * exp(Float64(Float64(y * Float64(log(z) - t)) + Float64(a * Float64(log(Float64(1.0 - z)) - b)))))
end
function tmp = code(x, y, z, t, a, b)
	tmp = x * exp(((y * (log(z) - t)) + (a * (log((1.0 - z)) - b))));
end
code[x_, y_, z_, t_, a_, b_] := N[(x * N[Exp[N[(N[(y * N[(N[Log[z], $MachinePrecision] - t), $MachinePrecision]), $MachinePrecision] + N[(a * N[(N[Log[N[(1.0 - z), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
x \cdot e^{y \cdot \left(\log z - t\right) + a \cdot \left(\log \left(1 - z\right) - b\right)}
\end{array}

Reproduce

?
herbie shell --seed 2024238 
(FPCore (x y z t a b)
  :name "Numeric.SpecFunctions:incompleteBetaApprox from math-functions-0.1.5.2, B"
  :precision binary64
  (* x (exp (+ (* y (- (log z) t)) (* a (- (log (- 1.0 z)) b))))))

Please file a bug report with this information.

Backtrace

flexp2: contract violation expected: flonum? given: 452.7228138273654-3.141592653589793i in: the 1st argument of (-> flonum? any) contract from: <pkgs>/math-lib/math/private/flonum/flonum-exp.rkt blaming: <pkgs>/herbie/core/logspace.rkt (assuming the contract is correct) at: <pkgs>/math-lib/math/private/flonum/flonum-exp.rkt:99:11LC
raise-blame-error/usr/local/racket/collects/racket/contract/private/blame.rkt3460
(unnamed)/usr/local/racket/collects/racket/contract/private/arrow-higher-order.rkt37933
log-/home/nightlies/herbie/bhargav-log-space/src/core/logspace.rkt570
compiled-prog/home/nightlies/herbie/bhargav-log-space/src/core/compiler.rkt262
predict-errors/home/nightlies/herbie/bhargav-log-space/src/core/explain.rkt880
explain/home/nightlies/herbie/bhargav-log-space/src/core/explain.rkt6140
explain!/home/nightlies/herbie/bhargav-log-space/src/core/mainloop.rkt3210
run-improve!/home/nightlies/herbie/bhargav-log-space/src/core/mainloop.rkt430
get-alternatives/report/home/nightlies/herbie/bhargav-log-space/src/api/sandbox.rkt1840
(unnamed)/home/nightlies/herbie/bhargav-log-space/src/api/sandbox.rkt2806
(unnamed)/usr/local/racket/share/pkgs/profile-lib/main.rkt4010
profile-thunk/usr/local/racket/share/pkgs/profile-lib/main.rkt90
(unnamed)/usr/local/racket/collects/racket/engine.rkt4224