
(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 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 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 (* (floor w) dX.u))
(t_1 (pow (hypot (* (floor h) dY.v) (* (floor w) dY.u)) 2.0))
(t_2 (fmax (pow (hypot t_0 (* (floor h) dX.v)) 2.0) t_1))
(t_3
(fabs (* (* (floor w) (floor h)) (- (* dX.u dY.v) (* dX.v dY.u))))))
(log
(exp
(log2
(if (> (/ t_2 t_3) (floor maxAniso))
(/ (sqrt t_2) (floor maxAniso))
(/ t_3 (sqrt (fmax (pow t_0 2.0) 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(w) * dX_46_u;
float t_1 = powf(hypotf((floorf(h) * dY_46_v), (floorf(w) * dY_46_u)), 2.0f);
float t_2 = fmaxf(powf(hypotf(t_0, (floorf(h) * dX_46_v)), 2.0f), t_1);
float t_3 = fabsf(((floorf(w) * floorf(h)) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u))));
float tmp;
if ((t_2 / t_3) > floorf(maxAniso)) {
tmp = sqrtf(t_2) / floorf(maxAniso);
} else {
tmp = t_3 / sqrtf(fmaxf(powf(t_0, 2.0f), t_1));
}
return logf(expf(log2f(tmp)));
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(floor(w) * dX_46_u) t_1 = hypot(Float32(floor(h) * dY_46_v), Float32(floor(w) * dY_46_u)) ^ Float32(2.0) t_2 = ((hypot(t_0, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)) != (hypot(t_0, Float32(floor(h) * dX_46_v)) ^ Float32(2.0))) ? t_1 : ((t_1 != t_1) ? (hypot(t_0, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)) : max((hypot(t_0, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)), t_1)) t_3 = abs(Float32(Float32(floor(w) * floor(h)) * Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u)))) tmp = Float32(0.0) if (Float32(t_2 / t_3) > floor(maxAniso)) tmp = Float32(sqrt(t_2) / floor(maxAniso)); else tmp = Float32(t_3 / sqrt((((t_0 ^ Float32(2.0)) != (t_0 ^ Float32(2.0))) ? t_1 : ((t_1 != t_1) ? (t_0 ^ Float32(2.0)) : max((t_0 ^ Float32(2.0)), t_1))))); end return log(exp(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(w) * dX_46_u; t_1 = hypot((floor(h) * dY_46_v), (floor(w) * dY_46_u)) ^ single(2.0); t_2 = max((hypot(t_0, (floor(h) * dX_46_v)) ^ single(2.0)), t_1); t_3 = abs(((floor(w) * floor(h)) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))); tmp = single(0.0); if ((t_2 / t_3) > floor(maxAniso)) tmp = sqrt(t_2) / floor(maxAniso); else tmp = t_3 / sqrt(max((t_0 ^ single(2.0)), t_1)); end tmp_2 = log(exp(log2(tmp))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_1 := {\left(\mathsf{hypot}\left(\left\lfloorh\right\rfloor \cdot dY.v, \left\lfloorw\right\rfloor \cdot dY.u\right)\right)}^{2}\\
t_2 := \mathsf{max}\left({\left(\mathsf{hypot}\left(t\_0, \left\lfloorh\right\rfloor \cdot dX.v\right)\right)}^{2}, t\_1\right)\\
t_3 := \left|\left(\left\lfloorw\right\rfloor \cdot \left\lfloorh\right\rfloor\right) \cdot \left(dX.u \cdot dY.v - dX.v \cdot dY.u\right)\right|\\
\log \left(e^{\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t\_2}{t\_3} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\sqrt{t\_2}}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_3}{\sqrt{\mathsf{max}\left({t\_0}^{2}, t\_1\right)}}\\
\end{array}}\right)
\end{array}
\end{array}
Initial program 73.4%
Simplified73.4%
Applied egg-rr73.4%
Taylor expanded in dX.u around inf 73.4%
unpow273.4%
unpow273.4%
swap-sqr73.4%
unpow273.4%
Simplified73.4%
Final simplification73.4%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (pow (hypot (* (floor h) dY.v) (* (floor w) dY.u)) 2.0))
(t_1
(fabs (* (floor h) (* (floor w) (- (* dX.u dY.v) (* dX.v dY.u))))))
(t_2 (* (floor w) dX.u))
(t_3 (fmax (pow (hypot t_2 (* (floor h) dX.v)) 2.0) t_0)))
(log2
(if (> (/ t_3 t_1) (floor maxAniso))
(/ (sqrt t_3) (floor maxAniso))
(/ t_1 (sqrt (fmax (pow t_2 2.0) t_0)))))))
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(h) * dY_46_v), (floorf(w) * dY_46_u)), 2.0f);
float t_1 = fabsf((floorf(h) * (floorf(w) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))));
float t_2 = floorf(w) * dX_46_u;
float t_3 = fmaxf(powf(hypotf(t_2, (floorf(h) * dX_46_v)), 2.0f), t_0);
float tmp;
if ((t_3 / t_1) > floorf(maxAniso)) {
tmp = sqrtf(t_3) / floorf(maxAniso);
} else {
tmp = t_1 / sqrtf(fmaxf(powf(t_2, 2.0f), t_0));
}
return log2f(tmp);
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot(Float32(floor(h) * dY_46_v), Float32(floor(w) * dY_46_u)) ^ Float32(2.0) t_1 = abs(Float32(floor(h) * Float32(floor(w) * Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u))))) t_2 = Float32(floor(w) * dX_46_u) t_3 = ((hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)) != (hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0))) ? t_0 : ((t_0 != t_0) ? (hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)) : max((hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)), t_0)) tmp = Float32(0.0) if (Float32(t_3 / t_1) > floor(maxAniso)) tmp = Float32(sqrt(t_3) / floor(maxAniso)); else tmp = Float32(t_1 / sqrt((((t_2 ^ Float32(2.0)) != (t_2 ^ Float32(2.0))) ? t_0 : ((t_0 != t_0) ? (t_2 ^ Float32(2.0)) : max((t_2 ^ Float32(2.0)), t_0))))); 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 = hypot((floor(h) * dY_46_v), (floor(w) * dY_46_u)) ^ single(2.0); t_1 = abs((floor(h) * (floor(w) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u))))); t_2 = floor(w) * dX_46_u; t_3 = max((hypot(t_2, (floor(h) * dX_46_v)) ^ single(2.0)), t_0); tmp = single(0.0); if ((t_3 / t_1) > floor(maxAniso)) tmp = sqrt(t_3) / floor(maxAniso); else tmp = t_1 / sqrt(max((t_2 ^ single(2.0)), t_0)); end tmp_2 = log2(tmp); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\left(\mathsf{hypot}\left(\left\lfloorh\right\rfloor \cdot dY.v, \left\lfloorw\right\rfloor \cdot dY.u\right)\right)}^{2}\\
t_1 := \left|\left\lfloorh\right\rfloor \cdot \left(\left\lfloorw\right\rfloor \cdot \left(dX.u \cdot dY.v - dX.v \cdot dY.u\right)\right)\right|\\
t_2 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_3 := \mathsf{max}\left({\left(\mathsf{hypot}\left(t\_2, \left\lfloorh\right\rfloor \cdot dX.v\right)\right)}^{2}, t\_0\right)\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t\_3}{t\_1} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\sqrt{t\_3}}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_1}{\sqrt{\mathsf{max}\left({t\_2}^{2}, t\_0\right)}}\\
\end{array}
\end{array}
\end{array}
Initial program 73.4%
Simplified73.4%
Applied egg-rr73.4%
Taylor expanded in dX.u around inf 73.4%
unpow273.4%
unpow273.4%
swap-sqr73.4%
unpow273.4%
Simplified73.4%
rem-log-exp73.4%
Applied egg-rr73.4%
(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) dX.u))
(t_2 (pow (hypot (* (floor h) dY.v) (* (floor w) dY.u)) 2.0))
(t_3 (/ (sqrt (fmax (pow (hypot t_1 t_0) 2.0) t_2)) (floor maxAniso)))
(t_4
(fabs (* (floor h) (* (floor w) (- (* dX.u dY.v) (* dX.v dY.u))))))
(t_5 (fmax (pow t_1 2.0) t_2))
(t_6 (/ t_4 (sqrt t_5))))
(if (<= dX.u 5000.0)
(log2 (if (> (/ (fmax (pow t_0 2.0) t_2) t_4) (floor maxAniso)) t_3 t_6))
(log2 (if (> (/ t_5 t_4) (floor maxAniso)) t_3 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 = floorf(h) * dX_46_v;
float t_1 = floorf(w) * dX_46_u;
float t_2 = powf(hypotf((floorf(h) * dY_46_v), (floorf(w) * dY_46_u)), 2.0f);
float t_3 = sqrtf(fmaxf(powf(hypotf(t_1, t_0), 2.0f), t_2)) / floorf(maxAniso);
float t_4 = fabsf((floorf(h) * (floorf(w) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))));
float t_5 = fmaxf(powf(t_1, 2.0f), t_2);
float t_6 = t_4 / sqrtf(t_5);
float tmp_1;
if (dX_46_u <= 5000.0f) {
float tmp_2;
if ((fmaxf(powf(t_0, 2.0f), t_2) / t_4) > floorf(maxAniso)) {
tmp_2 = t_3;
} else {
tmp_2 = t_6;
}
tmp_1 = log2f(tmp_2);
} else {
float tmp_3;
if ((t_5 / t_4) > floorf(maxAniso)) {
tmp_3 = t_3;
} 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(floor(h) * dX_46_v) t_1 = Float32(floor(w) * dX_46_u) t_2 = hypot(Float32(floor(h) * dY_46_v), Float32(floor(w) * dY_46_u)) ^ Float32(2.0) t_3 = Float32(sqrt((((hypot(t_1, t_0) ^ Float32(2.0)) != (hypot(t_1, t_0) ^ Float32(2.0))) ? t_2 : ((t_2 != t_2) ? (hypot(t_1, t_0) ^ Float32(2.0)) : max((hypot(t_1, t_0) ^ Float32(2.0)), t_2)))) / floor(maxAniso)) t_4 = abs(Float32(floor(h) * Float32(floor(w) * Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u))))) t_5 = ((t_1 ^ Float32(2.0)) != (t_1 ^ Float32(2.0))) ? t_2 : ((t_2 != t_2) ? (t_1 ^ Float32(2.0)) : max((t_1 ^ Float32(2.0)), t_2)) t_6 = Float32(t_4 / sqrt(t_5)) tmp_1 = Float32(0.0) if (dX_46_u <= Float32(5000.0)) tmp_2 = Float32(0.0) if (Float32((((t_0 ^ Float32(2.0)) != (t_0 ^ Float32(2.0))) ? t_2 : ((t_2 != t_2) ? (t_0 ^ Float32(2.0)) : max((t_0 ^ Float32(2.0)), t_2))) / t_4) > floor(maxAniso)) tmp_2 = t_3; else tmp_2 = t_6; end tmp_1 = log2(tmp_2); else tmp_3 = Float32(0.0) if (Float32(t_5 / t_4) > floor(maxAniso)) tmp_3 = t_3; else tmp_3 = t_6; end tmp_1 = log2(tmp_3); end return tmp_1 end
function tmp_5 = 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) * dX_46_u; t_2 = hypot((floor(h) * dY_46_v), (floor(w) * dY_46_u)) ^ single(2.0); t_3 = sqrt(max((hypot(t_1, t_0) ^ single(2.0)), t_2)) / floor(maxAniso); t_4 = abs((floor(h) * (floor(w) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u))))); t_5 = max((t_1 ^ single(2.0)), t_2); t_6 = t_4 / sqrt(t_5); tmp_2 = single(0.0); if (dX_46_u <= single(5000.0)) tmp_3 = single(0.0); if ((max((t_0 ^ single(2.0)), t_2) / t_4) > floor(maxAniso)) tmp_3 = t_3; else tmp_3 = t_6; end tmp_2 = log2(tmp_3); else tmp_4 = single(0.0); if ((t_5 / t_4) > floor(maxAniso)) tmp_4 = t_3; else tmp_4 = t_6; end tmp_2 = log2(tmp_4); end tmp_5 = tmp_2; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left\lfloorh\right\rfloor \cdot dX.v\\
t_1 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_2 := {\left(\mathsf{hypot}\left(\left\lfloorh\right\rfloor \cdot dY.v, \left\lfloorw\right\rfloor \cdot dY.u\right)\right)}^{2}\\
t_3 := \frac{\sqrt{\mathsf{max}\left({\left(\mathsf{hypot}\left(t\_1, t\_0\right)\right)}^{2}, t\_2\right)}}{\left\lfloormaxAniso\right\rfloor}\\
t_4 := \left|\left\lfloorh\right\rfloor \cdot \left(\left\lfloorw\right\rfloor \cdot \left(dX.u \cdot dY.v - dX.v \cdot dY.u\right)\right)\right|\\
t_5 := \mathsf{max}\left({t\_1}^{2}, t\_2\right)\\
t_6 := \frac{t\_4}{\sqrt{t\_5}}\\
\mathbf{if}\;dX.u \leq 5000:\\
\;\;\;\;\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{\mathsf{max}\left({t\_0}^{2}, t\_2\right)}{t\_4} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;t\_3\\
\mathbf{else}:\\
\;\;\;\;t\_6\\
\end{array}\\
\mathbf{else}:\\
\;\;\;\;\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t\_5}{t\_4} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;t\_3\\
\mathbf{else}:\\
\;\;\;\;t\_6\\
\end{array}\\
\end{array}
\end{array}
if dX.u < 5e3Initial program 74.7%
Simplified74.7%
Applied egg-rr74.7%
Taylor expanded in dX.u around inf 74.7%
unpow274.7%
unpow274.7%
swap-sqr74.7%
unpow274.7%
Simplified74.7%
rem-log-exp74.7%
Applied egg-rr74.7%
Taylor expanded in dX.u around 0 71.0%
*-commutative71.0%
unpow271.0%
unpow271.0%
swap-sqr71.0%
unpow271.0%
*-commutative71.0%
Simplified71.0%
if 5e3 < dX.u Initial program 66.1%
Simplified66.1%
Applied egg-rr66.1%
Taylor expanded in dX.u around inf 66.1%
unpow266.1%
unpow266.1%
swap-sqr66.1%
unpow266.1%
Simplified66.1%
rem-log-exp66.1%
Applied egg-rr66.1%
Taylor expanded in dX.u around inf 65.2%
unpow266.1%
unpow266.1%
swap-sqr66.1%
unpow266.1%
Simplified65.2%
Final simplification70.1%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
:precision binary32
(let* ((t_0 (pow (hypot (* (floor h) dY.v) (* (floor w) dY.u)) 2.0))
(t_1
(fabs (* (floor h) (* (floor w) (- (* dX.u dY.v) (* dX.v dY.u))))))
(t_2 (* (floor w) dX.u))
(t_3 (fmax (pow t_2 2.0) t_0)))
(log2
(if (> (/ t_3 t_1) (floor maxAniso))
(/
(sqrt (fmax (pow (hypot t_2 (* (floor h) dX.v)) 2.0) t_0))
(floor maxAniso))
(/ t_1 (sqrt 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(h) * dY_46_v), (floorf(w) * dY_46_u)), 2.0f);
float t_1 = fabsf((floorf(h) * (floorf(w) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u)))));
float t_2 = floorf(w) * dX_46_u;
float t_3 = fmaxf(powf(t_2, 2.0f), t_0);
float tmp;
if ((t_3 / t_1) > floorf(maxAniso)) {
tmp = sqrtf(fmaxf(powf(hypotf(t_2, (floorf(h) * dX_46_v)), 2.0f), t_0)) / floorf(maxAniso);
} else {
tmp = t_1 / sqrtf(t_3);
}
return log2f(tmp);
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = hypot(Float32(floor(h) * dY_46_v), Float32(floor(w) * dY_46_u)) ^ Float32(2.0) t_1 = abs(Float32(floor(h) * Float32(floor(w) * Float32(Float32(dX_46_u * dY_46_v) - Float32(dX_46_v * dY_46_u))))) t_2 = Float32(floor(w) * dX_46_u) t_3 = ((t_2 ^ Float32(2.0)) != (t_2 ^ Float32(2.0))) ? t_0 : ((t_0 != t_0) ? (t_2 ^ Float32(2.0)) : max((t_2 ^ Float32(2.0)), t_0)) tmp = Float32(0.0) if (Float32(t_3 / t_1) > floor(maxAniso)) tmp = Float32(sqrt((((hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)) != (hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0))) ? t_0 : ((t_0 != t_0) ? (hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)) : max((hypot(t_2, Float32(floor(h) * dX_46_v)) ^ Float32(2.0)), t_0)))) / floor(maxAniso)); else tmp = Float32(t_1 / sqrt(t_3)); 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 = hypot((floor(h) * dY_46_v), (floor(w) * dY_46_u)) ^ single(2.0); t_1 = abs((floor(h) * (floor(w) * ((dX_46_u * dY_46_v) - (dX_46_v * dY_46_u))))); t_2 = floor(w) * dX_46_u; t_3 = max((t_2 ^ single(2.0)), t_0); tmp = single(0.0); if ((t_3 / t_1) > floor(maxAniso)) tmp = sqrt(max((hypot(t_2, (floor(h) * dX_46_v)) ^ single(2.0)), t_0)) / floor(maxAniso); else tmp = t_1 / sqrt(t_3); end tmp_2 = log2(tmp); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := {\left(\mathsf{hypot}\left(\left\lfloorh\right\rfloor \cdot dY.v, \left\lfloorw\right\rfloor \cdot dY.u\right)\right)}^{2}\\
t_1 := \left|\left\lfloorh\right\rfloor \cdot \left(\left\lfloorw\right\rfloor \cdot \left(dX.u \cdot dY.v - dX.v \cdot dY.u\right)\right)\right|\\
t_2 := \left\lfloorw\right\rfloor \cdot dX.u\\
t_3 := \mathsf{max}\left({t\_2}^{2}, t\_0\right)\\
\log_{2} \begin{array}{l}
\mathbf{if}\;\frac{t\_3}{t\_1} > \left\lfloormaxAniso\right\rfloor:\\
\;\;\;\;\frac{\sqrt{\mathsf{max}\left({\left(\mathsf{hypot}\left(t\_2, \left\lfloorh\right\rfloor \cdot dX.v\right)\right)}^{2}, t\_0\right)}}{\left\lfloormaxAniso\right\rfloor}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_1}{\sqrt{t\_3}}\\
\end{array}
\end{array}
\end{array}
Initial program 73.4%
Simplified73.4%
Applied egg-rr73.4%
Taylor expanded in dX.u around inf 73.4%
unpow273.4%
unpow273.4%
swap-sqr73.4%
unpow273.4%
Simplified73.4%
rem-log-exp73.4%
Applied egg-rr73.4%
Taylor expanded in dX.u around inf 66.4%
unpow273.4%
unpow273.4%
swap-sqr73.4%
unpow273.4%
Simplified66.4%
Final simplification66.4%
herbie shell --seed 2024125
(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)))))))))