Exception for Beckmann Distribution sample, tan2theta, alphax == alphay

Specification

\[\left(0.0001 \leq \alpha \land \alpha \leq 1\right) \land \left(2.328306437 \cdot 10^{-10} \leq u0 \land u0 \leq 1\right)\]

Math

\[\begin{array}{l} \\ \left(\left(-\alpha\right) \cdot \alpha\right) \cdot \log \left(1 - u0\right) \end{array} \]

FPCore

(FPCore (alpha u0)
 :precision binary32
 (* (* (- alpha) alpha) (log (- 1.0 u0))))

C

float code(float alpha, float u0) {
	return (-alpha * alpha) * logf((1.0f - u0));
}

Fortran

real(4) function code(alpha, u0)
    real(4), intent (in) :: alpha
    real(4), intent (in) :: u0
    code = (-alpha * alpha) * log((1.0e0 - u0))
end function

Julia

function code(alpha, u0)
	return Float32(Float32(Float32(-alpha) * alpha) * log(Float32(Float32(1.0) - u0)))
end

MATLAB

function tmp = code(alpha, u0)
	tmp = (-alpha * alpha) * log((single(1.0) - u0));
end

Reproduce

herbie shell --seed 2024058 
(FPCore (alpha u0)
  :name "Beckmann Distribution sample, tan2theta, alphax == alphay"
  :precision binary32
  :pre (and (and (<= 0.0001 alpha) (<= alpha 1.0)) (and (<= 2.328306437e-10 u0) (<= u0 1.0)))
  (* (* (- alpha) alpha) (log (- 1.0 u0))))

Please file a bug report with this information.

Backtrace

map: all lists must have same size first list length: 257 other list length: 513 procedure: #<procedure:list>		L	C
gen-map	/usr/local/racket/collects/racket/private/map.rkt	257	2
actual-errors	/home/nightlies/herbie/literal-values/src/error-table.rkt	9	0
mutate!	/home/nightlies/herbie/literal-values/src/mainloop.rkt	343	0
run-improve!	/home/nightlies/herbie/literal-values/src/mainloop.rkt	329	0
get-alternatives/report	/home/nightlies/herbie/literal-values/src/sandbox.rkt	169	0
(unnamed)	/home/nightlies/herbie/literal-values/src/sandbox.rkt	262	6
(unnamed)	/usr/local/racket/share/pkgs/profile-lib/main.rkt	40	10
profile-thunk	/usr/local/racket/share/pkgs/profile-lib/main.rkt	9	0
(unnamed)	/usr/local/racket/collects/racket/engine.rkt	42	24