
(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_0) (* t_6 t_4))))
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_0;
} else {
tmp = t_6 * t_4;
}
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_0); else tmp = Float32(t_6 * t_4); 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_0; else tmp = t_6 * t_4; 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\_0\\
\mathbf{else}:\\
\;\;\;\;t\_6 \cdot t\_4\\
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 3 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_0) (* t_6 t_4))))
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_0;
} else {
tmp = t_6 * t_4;
}
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_0); else tmp = Float32(t_6 * t_4); 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_0; else tmp = t_6 * t_4; 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\_0\\
\mathbf{else}:\\
\;\;\;\;t\_6 \cdot t\_4\\
\end{array}
\end{array}
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* (floor h) dY.v))
(t_1 (pow (hypot (* (floor w) dY.u) t_0) 2.0))
(t_2 (* dX.v (floor h)))
(t_3 (pow (hypot (* dX.u (floor w)) t_2) 2.0))
(t_4 (sqrt (fmax t_3 t_1))))
(if (>= t_3 t_1) (/ t_2 t_4) (/ t_0 t_4))))
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) * dY_46_v;
float t_1 = powf(hypotf((floorf(w) * dY_46_u), t_0), 2.0f);
float t_2 = dX_46_v * floorf(h);
float t_3 = powf(hypotf((dX_46_u * floorf(w)), t_2), 2.0f);
float t_4 = sqrtf(fmaxf(t_3, t_1));
float tmp;
if (t_3 >= t_1) {
tmp = t_2 / t_4;
} else {
tmp = t_0 / t_4;
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(floor(h) * dY_46_v) t_1 = hypot(Float32(floor(w) * dY_46_u), t_0) ^ Float32(2.0) t_2 = Float32(dX_46_v * floor(h)) t_3 = hypot(Float32(dX_46_u * floor(w)), t_2) ^ Float32(2.0) t_4 = sqrt(((t_3 != t_3) ? t_1 : ((t_1 != t_1) ? t_3 : max(t_3, t_1)))) tmp = Float32(0.0) if (t_3 >= t_1) tmp = Float32(t_2 / t_4); else tmp = Float32(t_0 / t_4); 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) * dY_46_v; t_1 = hypot((floor(w) * dY_46_u), t_0) ^ single(2.0); t_2 = dX_46_v * floor(h); t_3 = hypot((dX_46_u * floor(w)), t_2) ^ single(2.0); t_4 = sqrt(max(t_3, t_1)); tmp = single(0.0); if (t_3 >= t_1) tmp = t_2 / t_4; else tmp = t_0 / t_4; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_1 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, t\_0\right)\right)}^{2}\\
t_2 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_3 := {\left(\mathsf{hypot}\left(dX.u \cdot \left\lfloorw\right\rfloor, t\_2\right)\right)}^{2}\\
t_4 := \sqrt{\mathsf{max}\left(t\_3, t\_1\right)}\\
\mathbf{if}\;t\_3 \geq t\_1:\\
\;\;\;\;\frac{t\_2}{t\_4}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_0}{t\_4}\\
\end{array}
\end{array}
Initial program 75.1%
Simplified75.3%
Applied egg-rr75.4%
Taylor expanded in w around 0 75.3%
Simplified75.4%
Taylor expanded in w around 0 75.4%
Simplified75.4%
Final simplification75.4%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* dX.u (floor w)))
(t_1 (* (floor h) dY.v))
(t_2 (pow (hypot (* (floor w) dY.u) t_1) 2.0))
(t_3 (* dX.v (floor h)))
(t_4 (sqrt (fmax (pow (hypot t_0 t_3) 2.0) t_2)))
(t_5 (/ t_1 t_4))
(t_6 (/ t_3 t_4)))
(if (<= dX.u 25000.0)
(if (>= (pow t_3 2.0) t_2) t_6 t_5)
(if (>= (pow t_0 2.0) t_2) t_6 t_5))))
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 = dX_46_u * floorf(w);
float t_1 = floorf(h) * dY_46_v;
float t_2 = powf(hypotf((floorf(w) * dY_46_u), t_1), 2.0f);
float t_3 = dX_46_v * floorf(h);
float t_4 = sqrtf(fmaxf(powf(hypotf(t_0, t_3), 2.0f), t_2));
float t_5 = t_1 / t_4;
float t_6 = t_3 / t_4;
float tmp_1;
if (dX_46_u <= 25000.0f) {
float tmp_2;
if (powf(t_3, 2.0f) >= t_2) {
tmp_2 = t_6;
} else {
tmp_2 = t_5;
}
tmp_1 = tmp_2;
} else if (powf(t_0, 2.0f) >= t_2) {
tmp_1 = t_6;
} else {
tmp_1 = t_5;
}
return tmp_1;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(dX_46_u * floor(w)) t_1 = Float32(floor(h) * dY_46_v) t_2 = hypot(Float32(floor(w) * dY_46_u), t_1) ^ Float32(2.0) t_3 = Float32(dX_46_v * floor(h)) t_4 = sqrt((((hypot(t_0, t_3) ^ Float32(2.0)) != (hypot(t_0, t_3) ^ Float32(2.0))) ? t_2 : ((t_2 != t_2) ? (hypot(t_0, t_3) ^ Float32(2.0)) : max((hypot(t_0, t_3) ^ Float32(2.0)), t_2)))) t_5 = Float32(t_1 / t_4) t_6 = Float32(t_3 / t_4) tmp_1 = Float32(0.0) if (dX_46_u <= Float32(25000.0)) tmp_2 = Float32(0.0) if ((t_3 ^ Float32(2.0)) >= t_2) tmp_2 = t_6; else tmp_2 = t_5; end tmp_1 = tmp_2; elseif ((t_0 ^ Float32(2.0)) >= t_2) tmp_1 = t_6; else tmp_1 = t_5; end return tmp_1 end
function tmp_4 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = dX_46_u * floor(w); t_1 = floor(h) * dY_46_v; t_2 = hypot((floor(w) * dY_46_u), t_1) ^ single(2.0); t_3 = dX_46_v * floor(h); t_4 = sqrt(max((hypot(t_0, t_3) ^ single(2.0)), t_2)); t_5 = t_1 / t_4; t_6 = t_3 / t_4; tmp_2 = single(0.0); if (dX_46_u <= single(25000.0)) tmp_3 = single(0.0); if ((t_3 ^ single(2.0)) >= t_2) tmp_3 = t_6; else tmp_3 = t_5; end tmp_2 = tmp_3; elseif ((t_0 ^ single(2.0)) >= t_2) tmp_2 = t_6; else tmp_2 = t_5; end tmp_4 = tmp_2; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_1 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_2 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, t\_1\right)\right)}^{2}\\
t_3 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_4 := \sqrt{\mathsf{max}\left({\left(\mathsf{hypot}\left(t\_0, t\_3\right)\right)}^{2}, t\_2\right)}\\
t_5 := \frac{t\_1}{t\_4}\\
t_6 := \frac{t\_3}{t\_4}\\
\mathbf{if}\;dX.u \leq 25000:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;{t\_3}^{2} \geq t\_2:\\
\;\;\;\;t\_6\\
\mathbf{else}:\\
\;\;\;\;t\_5\\
\end{array}\\
\mathbf{elif}\;{t\_0}^{2} \geq t\_2:\\
\;\;\;\;t\_6\\
\mathbf{else}:\\
\;\;\;\;t\_5\\
\end{array}
\end{array}
if dX.u < 25000Initial program 75.3%
Simplified75.3%
Applied egg-rr75.5%
Taylor expanded in w around 0 75.4%
Simplified75.5%
Taylor expanded in w around 0 75.5%
Simplified75.5%
Taylor expanded in dX.u around 0 69.0%
unpow269.0%
unpow269.0%
swap-sqr69.0%
unpow269.0%
Simplified69.0%
if 25000 < dX.u Initial program 74.7%
Simplified74.9%
Applied egg-rr75.0%
Taylor expanded in w around 0 74.8%
Simplified75.0%
Taylor expanded in w around 0 75.0%
Simplified75.0%
Taylor expanded in dX.u around inf 73.1%
unpow273.1%
unpow273.1%
swap-sqr73.1%
unpow273.1%
Simplified73.1%
Final simplification69.8%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* (floor h) dY.v))
(t_1 (* dX.v (floor h)))
(t_2 (pow (hypot (* (floor w) dY.u) t_0) 2.0))
(t_3 (* dX.u (floor w)))
(t_4 (sqrt (fmax (pow (hypot t_3 t_1) 2.0) t_2))))
(if (>= (pow t_3 2.0) t_2) (/ t_1 t_4) (/ t_0 t_4))))
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) * dY_46_v;
float t_1 = dX_46_v * floorf(h);
float t_2 = powf(hypotf((floorf(w) * dY_46_u), t_0), 2.0f);
float t_3 = dX_46_u * floorf(w);
float t_4 = sqrtf(fmaxf(powf(hypotf(t_3, t_1), 2.0f), t_2));
float tmp;
if (powf(t_3, 2.0f) >= t_2) {
tmp = t_1 / t_4;
} else {
tmp = t_0 / t_4;
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(floor(h) * dY_46_v) t_1 = Float32(dX_46_v * floor(h)) t_2 = hypot(Float32(floor(w) * dY_46_u), t_0) ^ Float32(2.0) t_3 = Float32(dX_46_u * floor(w)) t_4 = sqrt((((hypot(t_3, t_1) ^ Float32(2.0)) != (hypot(t_3, t_1) ^ Float32(2.0))) ? t_2 : ((t_2 != t_2) ? (hypot(t_3, t_1) ^ Float32(2.0)) : max((hypot(t_3, t_1) ^ Float32(2.0)), t_2)))) tmp = Float32(0.0) if ((t_3 ^ Float32(2.0)) >= t_2) tmp = Float32(t_1 / t_4); else tmp = Float32(t_0 / t_4); 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) * dY_46_v; t_1 = dX_46_v * floor(h); t_2 = hypot((floor(w) * dY_46_u), t_0) ^ single(2.0); t_3 = dX_46_u * floor(w); t_4 = sqrt(max((hypot(t_3, t_1) ^ single(2.0)), t_2)); tmp = single(0.0); if ((t_3 ^ single(2.0)) >= t_2) tmp = t_1 / t_4; else tmp = t_0 / t_4; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_1 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_2 := {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, t\_0\right)\right)}^{2}\\
t_3 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_4 := \sqrt{\mathsf{max}\left({\left(\mathsf{hypot}\left(t\_3, t\_1\right)\right)}^{2}, t\_2\right)}\\
\mathbf{if}\;{t\_3}^{2} \geq t\_2:\\
\;\;\;\;\frac{t\_1}{t\_4}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_0}{t\_4}\\
\end{array}
\end{array}
Initial program 75.1%
Simplified75.3%
Applied egg-rr75.4%
Taylor expanded in w around 0 75.3%
Simplified75.4%
Taylor expanded in w around 0 75.4%
Simplified75.4%
Taylor expanded in dX.u around inf 61.8%
unpow261.8%
unpow261.8%
swap-sqr61.8%
unpow261.8%
Simplified61.8%
Final simplification61.8%
herbie shell --seed 2024082
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:name "Anisotropic x16 LOD (line direction, v)"
: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 h) dX.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 h) dY.v))))