
(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 h) dY.v))
(t_3 (* (floor w) dX.u))
(t_4 (fmax (+ (* t_3 t_3) (* t_0 t_0)) (+ (* t_1 t_1) (* t_2 t_2))))
(t_5 (sqrt t_4))
(t_6 (fabs (- (* t_3 t_2) (* t_0 t_1)))))
(log2
(if (> (/ t_4 t_6) (floor maxAniso))
(/ t_5 (floor maxAniso))
(/ 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 = floorf(h) * dX_46_v;
float t_1 = floorf(w) * dY_46_u;
float t_2 = floorf(h) * dY_46_v;
float t_3 = floorf(w) * dX_46_u;
float t_4 = fmaxf(((t_3 * t_3) + (t_0 * t_0)), ((t_1 * t_1) + (t_2 * t_2)));
float t_5 = sqrtf(t_4);
float t_6 = fabsf(((t_3 * t_2) - (t_0 * t_1)));
float tmp;
if ((t_4 / t_6) > floorf(maxAniso)) {
tmp = t_5 / floorf(maxAniso);
} else {
tmp = t_6 / t_5;
}
return log2f(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(h) * dY_46_v) t_3 = Float32(floor(w) * dX_46_u) t_4 = (Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0)) != Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0))) ? Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)) : ((Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)) != Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2))) ? Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0)) : max(Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0)), Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)))) t_5 = sqrt(t_4) t_6 = abs(Float32(Float32(t_3 * t_2) - Float32(t_0 * t_1))) tmp = Float32(0.0) if (Float32(t_4 / t_6) > floor(maxAniso)) tmp = Float32(t_5 / floor(maxAniso)); else tmp = Float32(t_6 / t_5); end return log2(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(h) * dY_46_v; t_3 = floor(w) * dX_46_u; t_4 = max(((t_3 * t_3) + (t_0 * t_0)), ((t_1 * t_1) + (t_2 * t_2))); t_5 = sqrt(t_4); t_6 = abs(((t_3 * t_2) - (t_0 * t_1))); tmp = single(0.0); if ((t_4 / t_6) > floor(maxAniso)) tmp = t_5 / floor(maxAniso); else tmp = t_6 / t_5; end tmp_2 = log2(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\lfloorh\right\rfloor \cdot dY.v\\
t_3 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_4 := \mathsf{max}\left(t_3 \cdot t_3 + t_0 \cdot t_0, t_1 \cdot t_1 + t_2 \cdot t_2\right)\\
t_5 := \sqrt{t_4}\\
t_6 := \left|t_3 \cdot t_2 - t_0 \cdot t_1\right|\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t_4}{t_6} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{t_5}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\frac{t_6}{t_5}\\
\end{array}
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 5 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 h) dY.v))
(t_3 (* (floor w) dX.u))
(t_4 (fmax (+ (* t_3 t_3) (* t_0 t_0)) (+ (* t_1 t_1) (* t_2 t_2))))
(t_5 (sqrt t_4))
(t_6 (fabs (- (* t_3 t_2) (* t_0 t_1)))))
(log2
(if (> (/ t_4 t_6) (floor maxAniso))
(/ t_5 (floor maxAniso))
(/ 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 = floorf(h) * dX_46_v;
float t_1 = floorf(w) * dY_46_u;
float t_2 = floorf(h) * dY_46_v;
float t_3 = floorf(w) * dX_46_u;
float t_4 = fmaxf(((t_3 * t_3) + (t_0 * t_0)), ((t_1 * t_1) + (t_2 * t_2)));
float t_5 = sqrtf(t_4);
float t_6 = fabsf(((t_3 * t_2) - (t_0 * t_1)));
float tmp;
if ((t_4 / t_6) > floorf(maxAniso)) {
tmp = t_5 / floorf(maxAniso);
} else {
tmp = t_6 / t_5;
}
return log2f(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(h) * dY_46_v) t_3 = Float32(floor(w) * dX_46_u) t_4 = (Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0)) != Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0))) ? Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)) : ((Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)) != Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2))) ? Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0)) : max(Float32(Float32(t_3 * t_3) + Float32(t_0 * t_0)), Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)))) t_5 = sqrt(t_4) t_6 = abs(Float32(Float32(t_3 * t_2) - Float32(t_0 * t_1))) tmp = Float32(0.0) if (Float32(t_4 / t_6) > floor(maxAniso)) tmp = Float32(t_5 / floor(maxAniso)); else tmp = Float32(t_6 / t_5); end return log2(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(h) * dY_46_v; t_3 = floor(w) * dX_46_u; t_4 = max(((t_3 * t_3) + (t_0 * t_0)), ((t_1 * t_1) + (t_2 * t_2))); t_5 = sqrt(t_4); t_6 = abs(((t_3 * t_2) - (t_0 * t_1))); tmp = single(0.0); if ((t_4 / t_6) > floor(maxAniso)) tmp = t_5 / floor(maxAniso); else tmp = t_6 / t_5; end tmp_2 = log2(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\lfloorh\right\rfloor \cdot dY.v\\
t_3 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_4 := \mathsf{max}\left(t_3 \cdot t_3 + t_0 \cdot t_0, t_1 \cdot t_1 + t_2 \cdot t_2\right)\\
t_5 := \sqrt{t_4}\\
t_6 := \left|t_3 \cdot t_2 - t_0 \cdot t_1\right|\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t_4}{t_6} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{t_5}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\frac{t_6}{t_5}\\
\end{array}
\end{array}
\end{array}
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (- (* dX.u dY.v) (* dX.v dY.u)))
(t_1 (* dX.v (floor h)))
(t_2 (* (floor w) dY.u))
(t_3 (* dX.u (floor w)))
(t_4 (* (floor h) dY.v))
(t_5 (fmax (pow (hypot t_3 t_1) 2.0) (pow (hypot t_2 t_4) 2.0))))
(log2
(if (> (/ t_5 (* (floor w) (fabs (* (floor h) t_0)))) (floor maxAniso))
(/
(sqrt (fmax (+ (* t_3 t_3) (* t_1 t_1)) (+ (* t_2 t_2) (* t_4 t_4))))
(floor maxAniso))
(* (floor h) (/ (* (floor w) (fabs t_0)) (sqrt 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 * dY_46_v) - (dX_46_v * dY_46_u);
float t_1 = dX_46_v * floorf(h);
float t_2 = floorf(w) * dY_46_u;
float t_3 = dX_46_u * floorf(w);
float t_4 = floorf(h) * dY_46_v;
float t_5 = fmaxf(powf(hypotf(t_3, t_1), 2.0f), powf(hypotf(t_2, t_4), 2.0f));
float tmp;
if ((t_5 / (floorf(w) * fabsf((floorf(h) * t_0)))) > floorf(maxAniso)) {
tmp = sqrtf(fmaxf(((t_3 * t_3) + (t_1 * t_1)), ((t_2 * t_2) + (t_4 * t_4)))) / floorf(maxAniso);
} else {
tmp = floorf(h) * ((floorf(w) * fabsf(t_0)) / sqrtf(t_5));
}
return log2f(tmp);
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u)) t_1 = Float32(dX_46_v * floor(h)) t_2 = Float32(floor(w) * dY_46_u) t_3 = Float32(dX_46_u * floor(w)) t_4 = Float32(floor(h) * dY_46_v) t_5 = ((hypot(t_3, t_1) ^ Float32(2.0)) != (hypot(t_3, t_1) ^ Float32(2.0))) ? (hypot(t_2, t_4) ^ Float32(2.0)) : (((hypot(t_2, t_4) ^ Float32(2.0)) != (hypot(t_2, t_4) ^ Float32(2.0))) ? (hypot(t_3, t_1) ^ Float32(2.0)) : max((hypot(t_3, t_1) ^ Float32(2.0)), (hypot(t_2, t_4) ^ Float32(2.0)))) tmp = Float32(0.0) if (Float32(t_5 / Float32(floor(w) * abs(Float32(floor(h) * t_0)))) > floor(maxAniso)) tmp = Float32(sqrt(((Float32(Float32(t_3 * t_3) + Float32(t_1 * t_1)) != Float32(Float32(t_3 * t_3) + Float32(t_1 * t_1))) ? Float32(Float32(t_2 * t_2) + Float32(t_4 * t_4)) : ((Float32(Float32(t_2 * t_2) + Float32(t_4 * t_4)) != Float32(Float32(t_2 * t_2) + Float32(t_4 * t_4))) ? Float32(Float32(t_3 * t_3) + Float32(t_1 * t_1)) : max(Float32(Float32(t_3 * t_3) + Float32(t_1 * t_1)), Float32(Float32(t_2 * t_2) + Float32(t_4 * t_4)))))) / floor(maxAniso)); else tmp = Float32(floor(h) * Float32(Float32(floor(w) * abs(t_0)) / sqrt(t_5))); end return log2(tmp) end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = (dX_46_u * dY_46_v) - (dX_46_v * dY_46_u); t_1 = dX_46_v * floor(h); t_2 = floor(w) * dY_46_u; t_3 = dX_46_u * floor(w); t_4 = floor(h) * dY_46_v; t_5 = max((hypot(t_3, t_1) ^ single(2.0)), (hypot(t_2, t_4) ^ single(2.0))); tmp = single(0.0); if ((t_5 / (floor(w) * abs((floor(h) * t_0)))) > floor(maxAniso)) tmp = sqrt(max(((t_3 * t_3) + (t_1 * t_1)), ((t_2 * t_2) + (t_4 * t_4)))) / floor(maxAniso); else tmp = floor(h) * ((floor(w) * abs(t_0)) / sqrt(t_5)); end tmp_2 = log2(tmp); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := dX.u \cdot dY.v - dX.v \cdot dY.u\\
t_1 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_2 := \left\lfloorw\right\rfloor \cdot dY.u\\
t_3 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_4 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_5 := \mathsf{max}\left({\left(\mathsf{hypot}\left(t_3, t_1\right)\right)}^{2}, {\left(\mathsf{hypot}\left(t_2, t_4\right)\right)}^{2}\right)\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t_5}{\left\lfloorw\right\rfloor \cdot \left|\left\lfloorh\right\rfloor \cdot t_0\right|} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\sqrt{\mathsf{max}\left(t_3 \cdot t_3 + t_1 \cdot t_1, t_2 \cdot t_2 + t_4 \cdot t_4\right)}}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloorh\right\rfloor \cdot \frac{\left\lfloorw\right\rfloor \cdot \left|t_0\right|}{\sqrt{t_5}}\\
\end{array}
\end{array}
\end{array}
Initial program 76.1%
expm1-log1p-u76.0%
expm1-udef76.0%
Applied egg-rr76.0%
Simplified76.1%
expm1-log1p-u76.1%
expm1-udef76.1%
Applied egg-rr76.1%
Simplified76.1%
Final simplification76.1%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* dX.u (floor w)))
(t_1 (* (floor w) dY.u))
(t_2 (* (floor h) dY.v))
(t_3 (* dX.v (floor h)))
(t_4
(/
(sqrt (fmax (+ (* t_0 t_0) (* t_3 t_3)) (+ (* t_1 t_1) (* t_2 t_2))))
(floor maxAniso)))
(t_5 (fmax (pow (hypot t_0 t_3) 2.0) (pow (hypot t_1 t_2) 2.0)))
(t_6
(*
(floor h)
(/
(* (floor w) (fabs (- (* dX.u dY.v) (* dX.v dY.u))))
(sqrt t_5)))))
(if (<= h 13.5)
(log2
(if (>
(/ t_5 (* (* (floor w) (floor h)) (fma dX.u dY.v (* dX.v dY.u))))
(floor maxAniso))
t_4
t_6))
(log2
(if (>
(- (/ t_5 (* (floor w) (* (floor h) (* dX.v dY.u)))))
(floor maxAniso))
t_4
t_6)))))
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(w) * dY_46_u;
float t_2 = floorf(h) * dY_46_v;
float t_3 = dX_46_v * floorf(h);
float t_4 = sqrtf(fmaxf(((t_0 * t_0) + (t_3 * t_3)), ((t_1 * t_1) + (t_2 * t_2)))) / floorf(maxAniso);
float t_5 = fmaxf(powf(hypotf(t_0, t_3), 2.0f), powf(hypotf(t_1, t_2), 2.0f));
float t_6 = floorf(h) * ((floorf(w) * fabsf(((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))) / sqrtf(t_5));
float tmp_1;
if (h <= 13.5f) {
float tmp_2;
if ((t_5 / ((floorf(w) * floorf(h)) * fmaf(dX_46_u, dY_46_v, (dX_46_v * dY_46_u)))) > floorf(maxAniso)) {
tmp_2 = t_4;
} else {
tmp_2 = t_6;
}
tmp_1 = log2f(tmp_2);
} else {
float tmp_3;
if (-(t_5 / (floorf(w) * (floorf(h) * (dX_46_v * dY_46_u)))) > floorf(maxAniso)) {
tmp_3 = t_4;
} else {
tmp_3 = t_6;
}
tmp_1 = log2f(tmp_3);
}
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(w) * dY_46_u) t_2 = Float32(floor(h) * dY_46_v) t_3 = Float32(dX_46_v * floor(h)) t_4 = Float32(sqrt(((Float32(Float32(t_0 * t_0) + Float32(t_3 * t_3)) != Float32(Float32(t_0 * t_0) + Float32(t_3 * t_3))) ? Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)) : ((Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)) != Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2))) ? Float32(Float32(t_0 * t_0) + Float32(t_3 * t_3)) : max(Float32(Float32(t_0 * t_0) + Float32(t_3 * t_3)), Float32(Float32(t_1 * t_1) + Float32(t_2 * t_2)))))) / floor(maxAniso)) t_5 = ((hypot(t_0, t_3) ^ Float32(2.0)) != (hypot(t_0, t_3) ^ Float32(2.0))) ? (hypot(t_1, t_2) ^ Float32(2.0)) : (((hypot(t_1, t_2) ^ Float32(2.0)) != (hypot(t_1, t_2) ^ Float32(2.0))) ? (hypot(t_0, t_3) ^ Float32(2.0)) : max((hypot(t_0, t_3) ^ Float32(2.0)), (hypot(t_1, t_2) ^ Float32(2.0)))) t_6 = Float32(floor(h) * Float32(Float32(floor(w) * abs(Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u)))) / sqrt(t_5))) tmp_1 = Float32(0.0) if (h <= Float32(13.5)) tmp_2 = Float32(0.0) if (Float32(t_5 / Float32(Float32(floor(w) * floor(h)) * fma(dX_46_u, dY_46_v, Float32(dX_46_v * dY_46_u)))) > floor(maxAniso)) tmp_2 = t_4; else tmp_2 = t_6; end tmp_1 = log2(tmp_2); else tmp_3 = Float32(0.0) if (Float32(-Float32(t_5 / Float32(floor(w) * Float32(floor(h) * Float32(dX_46_v * dY_46_u))))) > floor(maxAniso)) tmp_3 = t_4; else tmp_3 = t_6; end tmp_1 = log2(tmp_3); end return tmp_1 end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_1 := \left\lfloorw\right\rfloor \cdot dY.u\\
t_2 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_3 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_4 := \frac{\sqrt{\mathsf{max}\left(t_0 \cdot t_0 + t_3 \cdot t_3, t_1 \cdot t_1 + t_2 \cdot t_2\right)}}{\left\lfloormaxAniso\right\rfloor}\\
t_5 := \mathsf{max}\left({\left(\mathsf{hypot}\left(t_0, t_3\right)\right)}^{2}, {\left(\mathsf{hypot}\left(t_1, t_2\right)\right)}^{2}\right)\\
t_6 := \left\lfloorh\right\rfloor \cdot \frac{\left\lfloorw\right\rfloor \cdot \left|dX.u \cdot dY.v - dX.v \cdot dY.u\right|}{\sqrt{t_5}}\\
\mathbf{if}\;h \leq 13.5:\\
\;\;\;\;\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t_5}{\left(\left\lfloorw\right\rfloor \cdot \left\lfloorh\right\rfloor\right) \cdot \mathsf{fma}\left(dX.u, dY.v, dX.v \cdot dY.u\right)} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;t_4\\
\mathbf{else}:\\
\;\;\;\;t_6\\
\end{array}\\
\mathbf{else}:\\
\;\;\;\;\log_{2} \begin{array}{l}
\mathbf{if}\;-\frac{t_5}{\left\lfloorw\right\rfloor \cdot \left(\left\lfloorh\right\rfloor \cdot \left(dX.v \cdot dY.u\right)\right)} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;t_4\\
\mathbf{else}:\\
\;\;\;\;t_6\\
\end{array}\\
\end{array}
\end{array}
if h < 13.5Initial program 86.8%
expm1-log1p-u86.8%
expm1-udef86.8%
Applied egg-rr86.8%
Simplified86.8%
expm1-log1p-u86.8%
expm1-udef86.8%
Applied egg-rr86.8%
Simplified86.8%
Taylor expanded in dX.u around 0 86.8%
Simplified48.4%
expm1-log1p-u48.4%
expm1-udef48.4%
Applied egg-rr60.1%
expm1-def60.1%
expm1-log1p60.1%
associate-*r*60.1%
Simplified60.1%
if 13.5 < h Initial program 72.5%
expm1-log1p-u72.5%
expm1-udef72.5%
Applied egg-rr72.5%
Simplified72.5%
expm1-log1p-u72.5%
expm1-udef72.5%
Applied egg-rr72.5%
Simplified72.5%
Taylor expanded in dX.u around 0 72.5%
Simplified42.5%
Taylor expanded in dX.u around 0 47.1%
*-commutative47.1%
*-commutative47.1%
associate-*r/47.1%
neg-mul-147.1%
associate-*r*47.1%
associate-*r*47.1%
Simplified47.1%
Final simplification50.3%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (- (* dX.u dY.v) (* dX.v dY.u)))
(t_1
(fmax
(pow (hypot (* dX.u (floor w)) (* dX.v (floor h))) 2.0)
(pow (hypot (* (floor w) dY.u) (* (floor h) dY.v)) 2.0)))
(t_2 (sqrt t_1)))
(log2
(if (> (/ t_1 (* (floor w) (fabs (* (floor h) t_0)))) (floor maxAniso))
(/ (expm1 (log1p t_2)) (floor maxAniso))
(* (floor h) (/ (* (floor w) (fabs t_0)) t_2))))))
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 * dY_46_v) - (dX_46_v * dY_46_u);
float t_1 = fmaxf(powf(hypotf((dX_46_u * floorf(w)), (dX_46_v * floorf(h))), 2.0f), powf(hypotf((floorf(w) * dY_46_u), (floorf(h) * dY_46_v)), 2.0f));
float t_2 = sqrtf(t_1);
float tmp;
if ((t_1 / (floorf(w) * fabsf((floorf(h) * t_0)))) > floorf(maxAniso)) {
tmp = expm1f(log1pf(t_2)) / floorf(maxAniso);
} else {
tmp = floorf(h) * ((floorf(w) * fabsf(t_0)) / t_2);
}
return log2f(tmp);
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u)) t_1 = ((hypot(Float32(dX_46_u * floor(w)), Float32(dX_46_v * floor(h))) ^ Float32(2.0)) != (hypot(Float32(dX_46_u * floor(w)), Float32(dX_46_v * floor(h))) ^ Float32(2.0))) ? (hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0)) : (((hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0)) != (hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0))) ? (hypot(Float32(dX_46_u * floor(w)), Float32(dX_46_v * floor(h))) ^ Float32(2.0)) : max((hypot(Float32(dX_46_u * floor(w)), Float32(dX_46_v * floor(h))) ^ Float32(2.0)), (hypot(Float32(floor(w) * dY_46_u), Float32(floor(h) * dY_46_v)) ^ Float32(2.0)))) t_2 = sqrt(t_1) tmp = Float32(0.0) if (Float32(t_1 / Float32(floor(w) * abs(Float32(floor(h) * t_0)))) > floor(maxAniso)) tmp = Float32(expm1(log1p(t_2)) / floor(maxAniso)); else tmp = Float32(floor(h) * Float32(Float32(floor(w) * abs(t_0)) / t_2)); end return log2(tmp) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := dX.u \cdot dY.v - dX.v \cdot dY.u\\
t_1 := \mathsf{max}\left({\left(\mathsf{hypot}\left(dX.u \cdot \left\lfloorw\right\rfloor, dX.v \cdot \left\lfloorh\right\rfloor\right)\right)}^{2}, {\left(\mathsf{hypot}\left(\left\lfloorw\right\rfloor \cdot dY.u, \left\lfloorh\right\rfloor \cdot dY.v\right)\right)}^{2}\right)\\
t_2 := \sqrt{t_1}\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t_1}{\left\lfloorw\right\rfloor \cdot \left|\left\lfloorh\right\rfloor \cdot t_0\right|} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\mathsf{expm1}\left(\mathsf{log1p}\left(t_2\right)\right)}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloorh\right\rfloor \cdot \frac{\left\lfloorw\right\rfloor \cdot \left|t_0\right|}{t_2}\\
\end{array}
\end{array}
\end{array}
Initial program 76.1%
expm1-log1p-u76.0%
expm1-udef76.0%
Applied egg-rr76.0%
Simplified76.1%
expm1-log1p-u76.1%
expm1-udef76.1%
Applied egg-rr76.1%
Simplified76.1%
Applied egg-rr75.3%
Final simplification75.3%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* dX.v (floor h)))
(t_1 (* (floor w) dY.u))
(t_2 (* dX.u (floor w)))
(t_3 (* (floor h) dY.v))
(t_4 (fmax (pow (hypot t_2 t_0) 2.0) (pow (hypot t_1 t_3) 2.0))))
(log2
(if (>
(- (/ t_4 (* (floor w) (* (floor h) (* dX.v dY.u)))))
(floor maxAniso))
(/
(sqrt (fmax (+ (* t_2 t_2) (* t_0 t_0)) (+ (* t_1 t_1) (* t_3 t_3))))
(floor maxAniso))
(*
(floor h)
(/ (* (floor w) (fabs (- (* dX.u dY.v) (* dX.v dY.u)))) (sqrt 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 = dX_46_v * floorf(h);
float t_1 = floorf(w) * dY_46_u;
float t_2 = dX_46_u * floorf(w);
float t_3 = floorf(h) * dY_46_v;
float t_4 = fmaxf(powf(hypotf(t_2, t_0), 2.0f), powf(hypotf(t_1, t_3), 2.0f));
float tmp;
if (-(t_4 / (floorf(w) * (floorf(h) * (dX_46_v * dY_46_u)))) > floorf(maxAniso)) {
tmp = sqrtf(fmaxf(((t_2 * t_2) + (t_0 * t_0)), ((t_1 * t_1) + (t_3 * t_3)))) / floorf(maxAniso);
} else {
tmp = floorf(h) * ((floorf(w) * fabsf(((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))) / sqrtf(t_4));
}
return log2f(tmp);
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(dX_46_v * floor(h)) t_1 = Float32(floor(w) * dY_46_u) t_2 = Float32(dX_46_u * floor(w)) t_3 = Float32(floor(h) * dY_46_v) t_4 = ((hypot(t_2, t_0) ^ Float32(2.0)) != (hypot(t_2, t_0) ^ Float32(2.0))) ? (hypot(t_1, t_3) ^ Float32(2.0)) : (((hypot(t_1, t_3) ^ Float32(2.0)) != (hypot(t_1, t_3) ^ Float32(2.0))) ? (hypot(t_2, t_0) ^ Float32(2.0)) : max((hypot(t_2, t_0) ^ Float32(2.0)), (hypot(t_1, t_3) ^ Float32(2.0)))) tmp = Float32(0.0) if (Float32(-Float32(t_4 / Float32(floor(w) * Float32(floor(h) * Float32(dX_46_v * dY_46_u))))) > floor(maxAniso)) tmp = Float32(sqrt(((Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)) != Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0))) ? Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3)) : ((Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3)) != Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3))) ? Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)) : max(Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)), Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3)))))) / floor(maxAniso)); else tmp = Float32(floor(h) * Float32(Float32(floor(w) * abs(Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u)))) / sqrt(t_4))); end return log2(tmp) end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = dX_46_v * floor(h); t_1 = floor(w) * dY_46_u; t_2 = dX_46_u * floor(w); t_3 = floor(h) * dY_46_v; t_4 = max((hypot(t_2, t_0) ^ single(2.0)), (hypot(t_1, t_3) ^ single(2.0))); tmp = single(0.0); if (-(t_4 / (floor(w) * (floor(h) * (dX_46_v * dY_46_u)))) > floor(maxAniso)) tmp = sqrt(max(((t_2 * t_2) + (t_0 * t_0)), ((t_1 * t_1) + (t_3 * t_3)))) / floor(maxAniso); else tmp = floor(h) * ((floor(w) * abs(((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))) / sqrt(t_4)); end tmp_2 = log2(tmp); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_1 := \left\lfloorw\right\rfloor \cdot dY.u\\
t_2 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_3 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_4 := \mathsf{max}\left({\left(\mathsf{hypot}\left(t_2, t_0\right)\right)}^{2}, {\left(\mathsf{hypot}\left(t_1, t_3\right)\right)}^{2}\right)\\
\log_{2} \begin{array}{l}
\mathbf{if}\;-\frac{t_4}{\left\lfloorw\right\rfloor \cdot \left(\left\lfloorh\right\rfloor \cdot \left(dX.v \cdot dY.u\right)\right)} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\sqrt{\mathsf{max}\left(t_2 \cdot t_2 + t_0 \cdot t_0, t_1 \cdot t_1 + t_3 \cdot t_3\right)}}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloorh\right\rfloor \cdot \frac{\left\lfloorw\right\rfloor \cdot \left|dX.u \cdot dY.v - dX.v \cdot dY.u\right|}{\sqrt{t_4}}\\
\end{array}
\end{array}
\end{array}
Initial program 76.1%
expm1-log1p-u76.0%
expm1-udef76.0%
Applied egg-rr76.0%
Simplified76.1%
expm1-log1p-u76.1%
expm1-udef76.1%
Applied egg-rr76.1%
Simplified76.1%
Taylor expanded in dX.u around 0 76.1%
Simplified44.0%
Taylor expanded in dX.u around 0 46.5%
*-commutative46.5%
*-commutative46.5%
associate-*r/46.5%
neg-mul-146.5%
associate-*r*46.5%
associate-*r*46.5%
Simplified46.5%
Final simplification46.5%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (* dX.v (floor h)))
(t_1 (* (floor w) dY.u))
(t_2 (* dX.u (floor w)))
(t_3 (* (floor h) dY.v))
(t_4 (fmax (pow (hypot t_2 t_0) 2.0) (pow (hypot t_1 t_3) 2.0))))
(log2
(if (> (/ t_4 (* dX.u (* (floor w) t_3))) (floor maxAniso))
(/
(sqrt (fmax (+ (* t_2 t_2) (* t_0 t_0)) (+ (* t_1 t_1) (* t_3 t_3))))
(floor maxAniso))
(*
(floor h)
(/ (* (floor w) (fabs (- (* dX.u dY.v) (* dX.v dY.u)))) (sqrt 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 = dX_46_v * floorf(h);
float t_1 = floorf(w) * dY_46_u;
float t_2 = dX_46_u * floorf(w);
float t_3 = floorf(h) * dY_46_v;
float t_4 = fmaxf(powf(hypotf(t_2, t_0), 2.0f), powf(hypotf(t_1, t_3), 2.0f));
float tmp;
if ((t_4 / (dX_46_u * (floorf(w) * t_3))) > floorf(maxAniso)) {
tmp = sqrtf(fmaxf(((t_2 * t_2) + (t_0 * t_0)), ((t_1 * t_1) + (t_3 * t_3)))) / floorf(maxAniso);
} else {
tmp = floorf(h) * ((floorf(w) * fabsf(((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))) / sqrtf(t_4));
}
return log2f(tmp);
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(dX_46_v * floor(h)) t_1 = Float32(floor(w) * dY_46_u) t_2 = Float32(dX_46_u * floor(w)) t_3 = Float32(floor(h) * dY_46_v) t_4 = ((hypot(t_2, t_0) ^ Float32(2.0)) != (hypot(t_2, t_0) ^ Float32(2.0))) ? (hypot(t_1, t_3) ^ Float32(2.0)) : (((hypot(t_1, t_3) ^ Float32(2.0)) != (hypot(t_1, t_3) ^ Float32(2.0))) ? (hypot(t_2, t_0) ^ Float32(2.0)) : max((hypot(t_2, t_0) ^ Float32(2.0)), (hypot(t_1, t_3) ^ Float32(2.0)))) tmp = Float32(0.0) if (Float32(t_4 / Float32(dX_46_u * Float32(floor(w) * t_3))) > floor(maxAniso)) tmp = Float32(sqrt(((Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)) != Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0))) ? Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3)) : ((Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3)) != Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3))) ? Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)) : max(Float32(Float32(t_2 * t_2) + Float32(t_0 * t_0)), Float32(Float32(t_1 * t_1) + Float32(t_3 * t_3)))))) / floor(maxAniso)); else tmp = Float32(floor(h) * Float32(Float32(floor(w) * abs(Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u)))) / sqrt(t_4))); end return log2(tmp) end
function tmp_2 = code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = dX_46_v * floor(h); t_1 = floor(w) * dY_46_u; t_2 = dX_46_u * floor(w); t_3 = floor(h) * dY_46_v; t_4 = max((hypot(t_2, t_0) ^ single(2.0)), (hypot(t_1, t_3) ^ single(2.0))); tmp = single(0.0); if ((t_4 / (dX_46_u * (floor(w) * t_3))) > floor(maxAniso)) tmp = sqrt(max(((t_2 * t_2) + (t_0 * t_0)), ((t_1 * t_1) + (t_3 * t_3)))) / floor(maxAniso); else tmp = floor(h) * ((floor(w) * abs(((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))) / sqrt(t_4)); end tmp_2 = log2(tmp); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := dX.v \cdot \left\lfloorh\right\rfloor\\
t_1 := \left\lfloorw\right\rfloor \cdot dY.u\\
t_2 := dX.u \cdot \left\lfloorw\right\rfloor\\
t_3 := \left\lfloorh\right\rfloor \cdot dY.v\\
t_4 := \mathsf{max}\left({\left(\mathsf{hypot}\left(t_2, t_0\right)\right)}^{2}, {\left(\mathsf{hypot}\left(t_1, t_3\right)\right)}^{2}\right)\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t_4}{dX.u \cdot \left(\left\lfloorw\right\rfloor \cdot t_3\right)} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\sqrt{\mathsf{max}\left(t_2 \cdot t_2 + t_0 \cdot t_0, t_1 \cdot t_1 + t_3 \cdot t_3\right)}}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloorh\right\rfloor \cdot \frac{\left\lfloorw\right\rfloor \cdot \left|dX.u \cdot dY.v - dX.v \cdot dY.u\right|}{\sqrt{t_4}}\\
\end{array}
\end{array}
\end{array}
Initial program 76.1%
expm1-log1p-u76.0%
expm1-udef76.0%
Applied egg-rr76.0%
Simplified76.1%
expm1-log1p-u76.1%
expm1-udef76.1%
Applied egg-rr76.1%
Simplified76.1%
Taylor expanded in dX.u around 0 76.1%
Simplified44.0%
Taylor expanded in dX.u around inf 42.0%
*-commutative42.0%
*-commutative42.0%
associate-*r*42.0%
*-commutative42.0%
Simplified42.0%
Final simplification42.0%
herbie shell --seed 2023301
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:name "Anisotropic x16 LOD (LOD)"
: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))
(log2 (if (> (/ (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)))) (fabs (- (* (* (floor w) dX.u) (* (floor h) dY.v)) (* (* (floor h) dX.v) (* (floor w) dY.u))))) (floor maxAniso)) (/ (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 maxAniso)) (/ (fabs (- (* (* (floor w) dX.u) (* (floor h) dY.v)) (* (* (floor h) dX.v) (* (floor w) dY.u)))) (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)))))))))