
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* (floor h) dX.v))
(t_1 (* (floor w) dY.u))
(t_2 (* (floor w) dX.u))
(t_3 (+ (* t_2 t_2) (* t_0 t_0)))
(t_4 (* (floor h) dY.v))
(t_5 (+ (* t_1 t_1) (* t_4 t_4)))
(t_6 (/ 1.0 (sqrt (fmax t_3 t_5)))))
(if (>= t_3 t_5) (* t_6 t_2) (* t_6 t_1))))
float code(float w, float h, float dX_46_u, float dX_46_v, float dY_46_u, float dY_46_v, float maxAniso) {
float t_0 = floorf(h) * dX_46_v;
float t_1 = floorf(w) * dY_46_u;
float t_2 = floorf(w) * dX_46_u;
float t_3 = (t_2 * t_2) + (t_0 * t_0);
float t_4 = floorf(h) * dY_46_v;
float t_5 = (t_1 * t_1) + (t_4 * t_4);
float t_6 = 1.0f / sqrtf(fmaxf(t_3, t_5));
float tmp;
if (t_3 >= t_5) {
tmp = t_6 * t_2;
} else {
tmp = t_6 * t_1;
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(floor(h) * dX_46_v) t_1 = Float32(floor(w) * dY_46_u) t_2 = Float32(floor(w) * dX_46_u) t_3 = Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)) t_4 = Float32(floor(h) * dY_46_v) t_5 = Float32(Float32(t_1 * t_1) + Float32(t_4 * t_4)) t_6 = Float32(Float32(1.0) / sqrt(((t_3 != t_3) ? t_5 : ((t_5 != t_5) ? t_3 : max(t_3, t_5))))) tmp = Float32(0.0) if (t_3 >= t_5) tmp = Float32(t_6 * t_2); else tmp = Float32(t_6 * t_1); end return tmp end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = floor(h) * dX_46_v; t_1 = floor(w) * dY_46_u; t_2 = floor(w) * dX_46_u; t_3 = (t_2 * t_2) + (t_0 * t_0); t_4 = floor(h) * dY_46_v; t_5 = (t_1 * t_1) + (t_4 * t_4); t_6 = single(1.0) / sqrt(max(t_3, t_5)); tmp = single(0.0); if (t_3 >= t_5) tmp = t_6 * t_2; else tmp = t_6 * t_1; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left\lfloorh\right\rfloor \cdot dX.v\\
t_1 := \left\lfloorw\right\rfloor \cdot dY.u\\
t_2 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_3 := t\_2 \cdot t\_2 + t\_0 \cdot t\_0\\
t_4 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_5 := t\_1 \cdot t\_1 + t\_4 \cdot t\_4\\
t_6 := \frac{1}{\sqrt{\mathsf{max}\left(t\_3, t\_5\right)}}\\
\mathbf{if}\;t\_3 \geq t\_5:\\
\;\;\;\;t\_6 \cdot t\_2\\
\mathbf{else}:\\
\;\;\;\;t\_6 \cdot t\_1\\
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 4 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* (floor h) dX.v))
(t_1 (* (floor w) dY.u))
(t_2 (* (floor w) dX.u))
(t_3 (+ (* t_2 t_2) (* t_0 t_0)))
(t_4 (* (floor h) dY.v))
(t_5 (+ (* t_1 t_1) (* t_4 t_4)))
(t_6 (/ 1.0 (sqrt (fmax t_3 t_5)))))
(if (>= t_3 t_5) (* t_6 t_2) (* t_6 t_1))))
float code(float w, float h, float dX_46_u, float dX_46_v, float dY_46_u, float dY_46_v, float maxAniso) {
float t_0 = floorf(h) * dX_46_v;
float t_1 = floorf(w) * dY_46_u;
float t_2 = floorf(w) * dX_46_u;
float t_3 = (t_2 * t_2) + (t_0 * t_0);
float t_4 = floorf(h) * dY_46_v;
float t_5 = (t_1 * t_1) + (t_4 * t_4);
float t_6 = 1.0f / sqrtf(fmaxf(t_3, t_5));
float tmp;
if (t_3 >= t_5) {
tmp = t_6 * t_2;
} else {
tmp = t_6 * t_1;
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(floor(h) * dX_46_v) t_1 = Float32(floor(w) * dY_46_u) t_2 = Float32(floor(w) * dX_46_u) t_3 = Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)) t_4 = Float32(floor(h) * dY_46_v) t_5 = Float32(Float32(t_1 * t_1) + Float32(t_4 * t_4)) t_6 = Float32(Float32(1.0) / sqrt(((t_3 != t_3) ? t_5 : ((t_5 != t_5) ? t_3 : max(t_3, t_5))))) tmp = Float32(0.0) if (t_3 >= t_5) tmp = Float32(t_6 * t_2); else tmp = Float32(t_6 * t_1); end return tmp end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = floor(h) * dX_46_v; t_1 = floor(w) * dY_46_u; t_2 = floor(w) * dX_46_u; t_3 = (t_2 * t_2) + (t_0 * t_0); t_4 = floor(h) * dY_46_v; t_5 = (t_1 * t_1) + (t_4 * t_4); t_6 = single(1.0) / sqrt(max(t_3, t_5)); tmp = single(0.0); if (t_3 >= t_5) tmp = t_6 * t_2; else tmp = t_6 * t_1; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left\lfloorh\right\rfloor \cdot dX.v\\
t_1 := \left\lfloorw\right\rfloor \cdot dY.u\\
t_2 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_3 := t\_2 \cdot t\_2 + t\_0 \cdot t\_0\\
t_4 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_5 := t\_1 \cdot t\_1 + t\_4 \cdot t\_4\\
t_6 := \frac{1}{\sqrt{\mathsf{max}\left(t\_3, t\_5\right)}}\\
\mathbf{if}\;t\_3 \geq t\_5:\\
\;\;\;\;t\_6 \cdot t\_2\\
\mathbf{else}:\\
\;\;\;\;t\_6 \cdot t\_1\\
\end{array}
\end{array}
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (pow (hypot (* (floor w) dY.u) (* (floor h) dY.v)) 2.0))
(t_1 (* dX.u (floor w)))
(t_2 (pow (hypot t_1 (* dX.v (floor h))) 2.0))
(t_3 (sqrt (fmax t_2 t_0))))
(if (>= t_2 t_0) (/ t_1 t_3) (/ (floor w) (/ t_3 dY.u)))))
float code(float w, float h, float dX_46_u, float dX_46_v, float dY_46_u, float dY_46_v, float maxAniso) {
float t_0 = powf(hypotf((floorf(w) * dY_46_u), (floorf(h) * dY_46_v)), 2.0f);
float t_1 = dX_46_u * floorf(w);
float t_2 = powf(hypotf(t_1, (dX_46_v * floorf(h))), 2.0f);
float t_3 = sqrtf(fmaxf(t_2, t_0));
float tmp;
if (t_2 >= t_0) {
tmp = t_1 / t_3;
} else {
tmp = floorf(w) / (t_3 / dY_46_u);
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0) t_1 = Float32(dX_46_u * floor(w)) t_2 = hypot(t_1, Float32(dX_46_v * floor(h))) ^ Float32(2.0) t_3 = sqrt(((t_2 != t_2) ? t_0 : ((t_0 != t_0) ? t_2 : max(t_2, t_0)))) tmp = Float32(0.0) if (t_2 >= t_0) tmp = Float32(t_1 / t_3); else tmp = Float32(floor(w) / Float32(t_3 / dY_46_u)); end return tmp end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot((floor(w) * dY_46_u), (floor(h) * dY_46_v)) ^ single(2.0); t_1 = dX_46_u * floor(w); t_2 = hypot(t_1, (dX_46_v * floor(h))) ^ single(2.0); t_3 = sqrt(max(t_2, t_0)); tmp = single(0.0); if (t_2 >= t_0) tmp = t_1 / t_3; else tmp = floor(w) / (t_3 / dY_46_u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, \left\lfloorh\right\rfloor \cdot dY.v\right)\right)}^{2}\\
t_1 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_2 := {\left(\mathsf{hypot}\left(t\_1, dX.v \cdot \left\lfloorh\right\rfloor\right)\right)}^{2}\\
t_3 := \sqrt{\mathsf{max}\left(t\_2, t\_0\right)}\\
\mathbf{if}\;t\_2 \geq t\_0:\\
\;\;\;\;\frac{t\_1}{t\_3}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left\lfloorw\right\rfloor}{\frac{t\_3}{dY.u}}\\
\end{array}
\end{array}
Initial program 74.1%
Simplified74.2%
Applied egg-rr74.3%
Taylor expanded in w around 0 74.2%
Simplified74.3%
Taylor expanded in w around 0 74.3%
Simplified74.3%
Final simplification74.3%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (pow (hypot (* (floor w) dY.u) (* (floor h) dY.v)) 2.0))
(t_1 (* dX.u (floor w)))
(t_2 (pow (hypot t_1 (* dX.v (floor h))) 2.0))
(t_3 (fmax t_2 t_0)))
(if (>= t_2 t_0)
(/ t_1 (sqrt t_3))
(* (floor w) (* dY.u (sqrt (/ 1.0 t_3)))))))
float code(float w, float h, float dX_46_u, float dX_46_v, float dY_46_u, float dY_46_v, float maxAniso) {
float t_0 = powf(hypotf((floorf(w) * dY_46_u), (floorf(h) * dY_46_v)), 2.0f);
float t_1 = dX_46_u * floorf(w);
float t_2 = powf(hypotf(t_1, (dX_46_v * floorf(h))), 2.0f);
float t_3 = fmaxf(t_2, t_0);
float tmp;
if (t_2 >= t_0) {
tmp = t_1 / sqrtf(t_3);
} else {
tmp = floorf(w) * (dY_46_u * sqrtf((1.0f / t_3)));
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0) t_1 = Float32(dX_46_u * floor(w)) t_2 = hypot(t_1, Float32(dX_46_v * floor(h))) ^ Float32(2.0) t_3 = (t_2 != t_2) ? t_0 : ((t_0 != t_0) ? t_2 : max(t_2, t_0)) tmp = Float32(0.0) if (t_2 >= t_0) tmp = Float32(t_1 / sqrt(t_3)); else tmp = Float32(floor(w) * Float32(dY_46_u * sqrt(Float32(Float32(1.0) / t_3)))); end return tmp end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot((floor(w) * dY_46_u), (floor(h) * dY_46_v)) ^ single(2.0); t_1 = dX_46_u * floor(w); t_2 = hypot(t_1, (dX_46_v * floor(h))) ^ single(2.0); t_3 = max(t_2, t_0); tmp = single(0.0); if (t_2 >= t_0) tmp = t_1 / sqrt(t_3); else tmp = floor(w) * (dY_46_u * sqrt((single(1.0) / t_3))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, \left\lfloorh\right\rfloor \cdot dY.v\right)\right)}^{2}\\
t_1 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_2 := {\left(\mathsf{hypot}\left(t\_1, dX.v \cdot \left\lfloorh\right\rfloor\right)\right)}^{2}\\
t_3 := \mathsf{max}\left(t\_2, t\_0\right)\\
\mathbf{if}\;t\_2 \geq t\_0:\\
\;\;\;\;\frac{t\_1}{\sqrt{t\_3}}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloorw\right\rfloor \cdot \left(dY.u \cdot \sqrt{\frac{1}{t\_3}}\right)\\
\end{array}
\end{array}
Initial program 74.1%
Simplified74.2%
Applied egg-rr74.3%
Taylor expanded in w around 0 74.2%
Simplified74.3%
Taylor expanded in w around 0 74.3%
Simplified74.3%
Taylor expanded in w around 0 74.1%
Simplified74.1%
Final simplification74.1%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (pow (hypot (* (floor w) dY.u) (* (floor h) dY.v)) 2.0))
(t_1 (* dX.u (floor w)))
(t_2 (pow (hypot t_1 (* dX.v (floor h))) 2.0))
(t_3 (sqrt (fmax t_2 t_0))))
(if (>= t_2 t_0) (/ t_1 t_3) (* (floor w) (/ dY.u t_3)))))
float code(float w, float h, float dX_46_u, float dX_46_v, float dY_46_u, float dY_46_v, float maxAniso) {
float t_0 = powf(hypotf((floorf(w) * dY_46_u), (floorf(h) * dY_46_v)), 2.0f);
float t_1 = dX_46_u * floorf(w);
float t_2 = powf(hypotf(t_1, (dX_46_v * floorf(h))), 2.0f);
float t_3 = sqrtf(fmaxf(t_2, t_0));
float tmp;
if (t_2 >= t_0) {
tmp = t_1 / t_3;
} else {
tmp = floorf(w) * (dY_46_u / t_3);
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0) t_1 = Float32(dX_46_u * floor(w)) t_2 = hypot(t_1, Float32(dX_46_v * floor(h))) ^ Float32(2.0) t_3 = sqrt(((t_2 != t_2) ? t_0 : ((t_0 != t_0) ? t_2 : max(t_2, t_0)))) tmp = Float32(0.0) if (t_2 >= t_0) tmp = Float32(t_1 / t_3); else tmp = Float32(floor(w) * Float32(dY_46_u / t_3)); end return tmp end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot((floor(w) * dY_46_u), (floor(h) * dY_46_v)) ^ single(2.0); t_1 = dX_46_u * floor(w); t_2 = hypot(t_1, (dX_46_v * floor(h))) ^ single(2.0); t_3 = sqrt(max(t_2, t_0)); tmp = single(0.0); if (t_2 >= t_0) tmp = t_1 / t_3; else tmp = floor(w) * (dY_46_u / t_3); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, \left\lfloorh\right\rfloor \cdot dY.v\right)\right)}^{2}\\
t_1 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_2 := {\left(\mathsf{hypot}\left(t\_1, dX.v \cdot \left\lfloorh\right\rfloor\right)\right)}^{2}\\
t_3 := \sqrt{\mathsf{max}\left(t\_2, t\_0\right)}\\
\mathbf{if}\;t\_2 \geq t\_0:\\
\;\;\;\;\frac{t\_1}{t\_3}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloorw\right\rfloor \cdot \frac{dY.u}{t\_3}\\
\end{array}
\end{array}
Initial program 74.1%
Simplified74.2%
Applied egg-rr74.3%
Taylor expanded in w around 0 74.2%
Simplified74.3%
Taylor expanded in w around 0 74.3%
Simplified74.3%
div-inv74.2%
Applied egg-rr74.2%
associate-/r/74.1%
associate-*l/74.2%
*-lft-identity74.2%
*-commutative74.2%
*-commutative74.2%
Simplified74.2%
Final simplification74.2%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (pow (hypot (* (floor w) dY.u) (* (floor h) dY.v)) 2.0))
(t_1 (* dX.u (floor w)))
(t_2 (pow (hypot t_1 (* dX.v (floor h))) 2.0))
(t_3 (sqrt (fmax t_2 t_0))))
(if (>= t_2 t_0) (/ t_1 t_3) (* dY.u (/ (floor w) t_3)))))
float code(float w, float h, float dX_46_u, float dX_46_v, float dY_46_u, float dY_46_v, float maxAniso) {
float t_0 = powf(hypotf((floorf(w) * dY_46_u), (floorf(h) * dY_46_v)), 2.0f);
float t_1 = dX_46_u * floorf(w);
float t_2 = powf(hypotf(t_1, (dX_46_v * floorf(h))), 2.0f);
float t_3 = sqrtf(fmaxf(t_2, t_0));
float tmp;
if (t_2 >= t_0) {
tmp = t_1 / t_3;
} else {
tmp = dY_46_u * (floorf(w) / t_3);
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0) t_1 = Float32(dX_46_u * floor(w)) t_2 = hypot(t_1, Float32(dX_46_v * floor(h))) ^ Float32(2.0) t_3 = sqrt(((t_2 != t_2) ? t_0 : ((t_0 != t_0) ? t_2 : max(t_2, t_0)))) tmp = Float32(0.0) if (t_2 >= t_0) tmp = Float32(t_1 / t_3); else tmp = Float32(dY_46_u * Float32(floor(w) / t_3)); end return tmp end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot((floor(w) * dY_46_u), (floor(h) * dY_46_v)) ^ single(2.0); t_1 = dX_46_u * floor(w); t_2 = hypot(t_1, (dX_46_v * floor(h))) ^ single(2.0); t_3 = sqrt(max(t_2, t_0)); tmp = single(0.0); if (t_2 >= t_0) tmp = t_1 / t_3; else tmp = dY_46_u * (floor(w) / t_3); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, \left\lfloorh\right\rfloor \cdot dY.v\right)\right)}^{2}\\
t_1 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_2 := {\left(\mathsf{hypot}\left(t\_1, dX.v \cdot \left\lfloorh\right\rfloor\right)\right)}^{2}\\
t_3 := \sqrt{\mathsf{max}\left(t\_2, t\_0\right)}\\
\mathbf{if}\;t\_2 \geq t\_0:\\
\;\;\;\;\frac{t\_1}{t\_3}\\
\mathbf{else}:\\
\;\;\;\;dY.u \cdot \frac{\left\lfloorw\right\rfloor}{t\_3}\\
\end{array}
\end{array}
Initial program 74.1%
Simplified74.2%
Applied egg-rr74.3%
Taylor expanded in w around 0 74.2%
Simplified74.3%
Taylor expanded in w around 0 74.3%
Simplified74.3%
associate-/r/74.2%
Applied egg-rr74.2%
Final simplification74.2%
herbie shell --seed 2024039
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:name "Anisotropic x16 LOD (line direction, u)"
:precision binary32
:pre (and (and (and (and (and (and (and (<= 1.0 w) (<= w 16384.0)) (and (<= 1.0 h) (<= h 16384.0))) (and (<= 1e-20 (fabs dX.u)) (<= (fabs dX.u) 1e+20))) (and (<= 1e-20 (fabs dX.v)) (<= (fabs dX.v) 1e+20))) (and (<= 1e-20 (fabs dY.u)) (<= (fabs dY.u) 1e+20))) (and (<= 1e-20 (fabs dY.v)) (<= (fabs dY.v) 1e+20))) (== maxAniso 16.0))
(if (>= (+ (* (* (floor w) dX.u) (* (floor w) dX.u)) (* (* (floor h) dX.v) (* (floor h) dX.v))) (+ (* (* (floor w) dY.u) (* (floor w) dY.u)) (* (* (floor h) dY.v) (* (floor h) dY.v)))) (* (/ 1.0 (sqrt (fmax (+ (* (* (floor w) dX.u) (* (floor w) dX.u)) (* (* (floor h) dX.v) (* (floor h) dX.v))) (+ (* (* (floor w) dY.u) (* (floor w) dY.u)) (* (* (floor h) dY.v) (* (floor h) dY.v)))))) (* (floor w) dX.u)) (* (/ 1.0 (sqrt (fmax (+ (* (* (floor w) dX.u) (* (floor w) dX.u)) (* (* (floor h) dX.v) (* (floor h) dX.v))) (+ (* (* (floor w) dY.u) (* (floor w) dY.u)) (* (* (floor h) dY.v) (* (floor h) dY.v)))))) (* (floor w) dY.u))))