
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
: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))
(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(fmax(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}
t_0 := \left\lfloor h\right\rfloor \cdot dX.v\\
t_1 := \left\lfloor w\right\rfloor \cdot dY.u\\
t_2 := \left\lfloor w\right\rfloor \cdot dX.u\\
t_3 := t\_2 \cdot t\_2 + t\_0 \cdot t\_0\\
t_4 := \left\lfloor h\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}
Herbie found 4 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
: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))
(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(fmax(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}
t_0 := \left\lfloor h\right\rfloor \cdot dX.v\\
t_1 := \left\lfloor w\right\rfloor \cdot dY.u\\
t_2 := \left\lfloor w\right\rfloor \cdot dX.u\\
t_3 := t\_2 \cdot t\_2 + t\_0 \cdot t\_0\\
t_4 := \left\lfloor h\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}
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
: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))
(let* ((t_0 (* dY.v (floor h)))
(t_1 (* dY.u (floor w)))
(t_2 (fma t_0 t_0 (* t_1 t_1)))
(t_3 (* dX.u (floor w)))
(t_4 (* dX.v (floor h)))
(t_5 (fma t_4 t_4 (* t_3 t_3)))
(t_6 (sqrt (fmax t_2 t_5))))
(if (>= t_5 t_2) (/ t_3 t_6) (/ t_1 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 = dY_46_v * floorf(h);
float t_1 = dY_46_u * floorf(w);
float t_2 = fmaf(t_0, t_0, (t_1 * t_1));
float t_3 = dX_46_u * floorf(w);
float t_4 = dX_46_v * floorf(h);
float t_5 = fmaf(t_4, t_4, (t_3 * t_3));
float t_6 = sqrtf(fmaxf(t_2, t_5));
float tmp;
if (t_5 >= t_2) {
tmp = t_3 / t_6;
} else {
tmp = t_1 / t_6;
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(dY_46_v * floor(h)) t_1 = Float32(dY_46_u * floor(w)) t_2 = fma(t_0, t_0, Float32(t_1 * t_1)) t_3 = Float32(dX_46_u * floor(w)) t_4 = Float32(dX_46_v * floor(h)) t_5 = fma(t_4, t_4, Float32(t_3 * t_3)) t_6 = sqrt(fmax(t_2, t_5)) tmp = Float32(0.0) if (t_5 >= t_2) tmp = Float32(t_3 / t_6); else tmp = Float32(t_1 / t_6); end return tmp end
\begin{array}{l}
t_0 := dY.v \cdot \left\lfloor h\right\rfloor \\
t_1 := dY.u \cdot \left\lfloor w\right\rfloor \\
t_2 := \mathsf{fma}\left(t\_0, t\_0, t\_1 \cdot t\_1\right)\\
t_3 := dX.u \cdot \left\lfloor w\right\rfloor \\
t_4 := dX.v \cdot \left\lfloor h\right\rfloor \\
t_5 := \mathsf{fma}\left(t\_4, t\_4, t\_3 \cdot t\_3\right)\\
t_6 := \sqrt{\mathsf{max}\left(t\_2, t\_5\right)}\\
\mathbf{if}\;t\_5 \geq t\_2:\\
\;\;\;\;\frac{t\_3}{t\_6}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_1}{t\_6}\\
\end{array}
Initial program 77.2%
Applied rewrites77.5%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
: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))
(let* ((t_0 (* (floor h) (floor h)))
(t_1 (* dY.v (floor h)))
(t_2 (* dY.u (floor w)))
(t_3 (fma t_1 t_1 (* t_2 t_2)))
(t_4 (* dX.v (floor h)))
(t_5 (* dX.u (floor w)))
(t_6 (* t_5 t_5))
(t_7 (fma t_4 t_4 t_6)))
(if (>= t_7 t_3)
(/ t_5 (sqrt (fmax t_3 t_7)))
(*
(floor w)
(/
dY.u
(sqrt
(fmax
(fma (* t_0 dX.v) dX.v t_6)
(fma t_2 t_2 (* (* t_0 dY.v) dY.v)))))))))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) * floorf(h);
float t_1 = dY_46_v * floorf(h);
float t_2 = dY_46_u * floorf(w);
float t_3 = fmaf(t_1, t_1, (t_2 * t_2));
float t_4 = dX_46_v * floorf(h);
float t_5 = dX_46_u * floorf(w);
float t_6 = t_5 * t_5;
float t_7 = fmaf(t_4, t_4, t_6);
float tmp;
if (t_7 >= t_3) {
tmp = t_5 / sqrtf(fmaxf(t_3, t_7));
} else {
tmp = floorf(w) * (dY_46_u / sqrtf(fmaxf(fmaf((t_0 * dX_46_v), dX_46_v, t_6), fmaf(t_2, t_2, ((t_0 * dY_46_v) * dY_46_v)))));
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(floor(h) * floor(h)) t_1 = Float32(dY_46_v * floor(h)) t_2 = Float32(dY_46_u * floor(w)) t_3 = fma(t_1, t_1, Float32(t_2 * t_2)) t_4 = Float32(dX_46_v * floor(h)) t_5 = Float32(dX_46_u * floor(w)) t_6 = Float32(t_5 * t_5) t_7 = fma(t_4, t_4, t_6) tmp = Float32(0.0) if (t_7 >= t_3) tmp = Float32(t_5 / sqrt(fmax(t_3, t_7))); else tmp = Float32(floor(w) * Float32(dY_46_u / sqrt(fmax(fma(Float32(t_0 * dX_46_v), dX_46_v, t_6), fma(t_2, t_2, Float32(Float32(t_0 * dY_46_v) * dY_46_v)))))); end return tmp end
\begin{array}{l}
t_0 := \left\lfloor h\right\rfloor \cdot \left\lfloor h\right\rfloor \\
t_1 := dY.v \cdot \left\lfloor h\right\rfloor \\
t_2 := dY.u \cdot \left\lfloor w\right\rfloor \\
t_3 := \mathsf{fma}\left(t\_1, t\_1, t\_2 \cdot t\_2\right)\\
t_4 := dX.v \cdot \left\lfloor h\right\rfloor \\
t_5 := dX.u \cdot \left\lfloor w\right\rfloor \\
t_6 := t\_5 \cdot t\_5\\
t_7 := \mathsf{fma}\left(t\_4, t\_4, t\_6\right)\\
\mathbf{if}\;t\_7 \geq t\_3:\\
\;\;\;\;\frac{t\_5}{\sqrt{\mathsf{max}\left(t\_3, t\_7\right)}}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloor w\right\rfloor \cdot \frac{dY.u}{\sqrt{\mathsf{max}\left(\mathsf{fma}\left(t\_0 \cdot dX.v, dX.v, t\_6\right), \mathsf{fma}\left(t\_2, t\_2, \left(t\_0 \cdot dY.v\right) \cdot dY.v\right)\right)}}\\
\end{array}
Initial program 77.2%
Applied rewrites77.5%
Applied rewrites77.3%
Applied rewrites77.4%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
: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))
(let* ((t_0
(*
(* (/ (floor w) (* dY.v dY.v)) (* (* dY.u dY.u) (floor w)))
(* dY.v dY.v)))
(t_1
(fma
(* (* (floor h) (floor h)) dX.v)
dX.v
(* (* (* dX.u dX.u) (floor w)) (floor w))))
(t_2 (sqrt (fmax t_0 t_1))))
(if (>= t_1 t_0)
(/ (* dX.u (floor w)) t_2)
(/ (* dY.u (floor w)) 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 = ((floorf(w) / (dY_46_v * dY_46_v)) * ((dY_46_u * dY_46_u) * floorf(w))) * (dY_46_v * dY_46_v);
float t_1 = fmaf(((floorf(h) * floorf(h)) * dX_46_v), dX_46_v, (((dX_46_u * dX_46_u) * floorf(w)) * floorf(w)));
float t_2 = sqrtf(fmaxf(t_0, t_1));
float tmp;
if (t_1 >= t_0) {
tmp = (dX_46_u * floorf(w)) / t_2;
} else {
tmp = (dY_46_u * floorf(w)) / t_2;
}
return tmp;
}
function code(w, h, dX_46_u, dX_46_v, dY_46_u, dY_46_v, maxAniso) t_0 = Float32(Float32(Float32(floor(w) / Float32(dY_46_v * dY_46_v)) * Float32(Float32(dY_46_u * dY_46_u) * floor(w))) * Float32(dY_46_v * dY_46_v)) t_1 = fma(Float32(Float32(floor(h) * floor(h)) * dX_46_v), dX_46_v, Float32(Float32(Float32(dX_46_u * dX_46_u) * floor(w)) * floor(w))) t_2 = sqrt(fmax(t_0, t_1)) tmp = Float32(0.0) if (t_1 >= t_0) tmp = Float32(Float32(dX_46_u * floor(w)) / t_2); else tmp = Float32(Float32(dY_46_u * floor(w)) / t_2); end return tmp end
\begin{array}{l}
t_0 := \left(\frac{\left\lfloor w\right\rfloor }{dY.v \cdot dY.v} \cdot \left(\left(dY.u \cdot dY.u\right) \cdot \left\lfloor w\right\rfloor \right)\right) \cdot \left(dY.v \cdot dY.v\right)\\
t_1 := \mathsf{fma}\left(\left(\left\lfloor h\right\rfloor \cdot \left\lfloor h\right\rfloor \right) \cdot dX.v, dX.v, \left(\left(dX.u \cdot dX.u\right) \cdot \left\lfloor w\right\rfloor \right) \cdot \left\lfloor w\right\rfloor \right)\\
t_2 := \sqrt{\mathsf{max}\left(t\_0, t\_1\right)}\\
\mathbf{if}\;t\_1 \geq t\_0:\\
\;\;\;\;\frac{dX.u \cdot \left\lfloor w\right\rfloor }{t\_2}\\
\mathbf{else}:\\
\;\;\;\;\frac{dY.u \cdot \left\lfloor w\right\rfloor }{t\_2}\\
\end{array}
Initial program 77.2%
Taylor expanded in dY.v around inf
Applied rewrites66.8%
Applied rewrites65.4%
Taylor expanded in dY.u around inf
Applied rewrites48.9%
Applied rewrites47.5%
(FPCore (w h dX.u dX.v dY.u dY.v maxAniso)
: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))
(let* ((t_0 (* (floor h) (floor h)))
(t_1 (* dY.v (floor h)))
(t_2 (* dY.u (floor w)))
(t_3 (* dX.u (floor w)))
(t_4 (* t_3 t_3))
(t_5 (* dX.v (floor h))))
(if 0
(/
t_3
(sqrt
(fmax
(fma (* t_0 dX.v) dX.v t_4)
(fma (* t_2 dY.u) (floor w) (* (* t_0 dY.v) dY.v)))))
(*
(floor w)
(/
dY.u
(sqrt (fmax (fma t_1 t_1 (* t_2 t_2)) (fma t_5 t_5 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) * floorf(h);
float t_1 = dY_46_v * floorf(h);
float t_2 = dY_46_u * floorf(w);
float t_3 = dX_46_u * floorf(w);
float t_4 = t_3 * t_3;
float t_5 = dX_46_v * floorf(h);
float tmp;
if (0.0f) {
tmp = t_3 / sqrtf(fmaxf(fmaf((t_0 * dX_46_v), dX_46_v, t_4), fmaf((t_2 * dY_46_u), floorf(w), ((t_0 * dY_46_v) * dY_46_v))));
} else {
tmp = floorf(w) * (dY_46_u / sqrtf(fmaxf(fmaf(t_1, t_1, (t_2 * t_2)), fmaf(t_5, t_5, 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) * floor(h)) t_1 = Float32(dY_46_v * floor(h)) t_2 = Float32(dY_46_u * floor(w)) t_3 = Float32(dX_46_u * floor(w)) t_4 = Float32(t_3 * t_3) t_5 = Float32(dX_46_v * floor(h)) tmp = Float32(0.0) if (Float32(0.0)) tmp = Float32(t_3 / sqrt(fmax(fma(Float32(t_0 * dX_46_v), dX_46_v, t_4), fma(Float32(t_2 * dY_46_u), floor(w), Float32(Float32(t_0 * dY_46_v) * dY_46_v))))); else tmp = Float32(floor(w) * Float32(dY_46_u / sqrt(fmax(fma(t_1, t_1, Float32(t_2 * t_2)), fma(t_5, t_5, t_4))))); end return tmp end
\begin{array}{l}
t_0 := \left\lfloor h\right\rfloor \cdot \left\lfloor h\right\rfloor \\
t_1 := dY.v \cdot \left\lfloor h\right\rfloor \\
t_2 := dY.u \cdot \left\lfloor w\right\rfloor \\
t_3 := dX.u \cdot \left\lfloor w\right\rfloor \\
t_4 := t\_3 \cdot t\_3\\
t_5 := dX.v \cdot \left\lfloor h\right\rfloor \\
\mathbf{if}\;0:\\
\;\;\;\;\frac{t\_3}{\sqrt{\mathsf{max}\left(\mathsf{fma}\left(t\_0 \cdot dX.v, dX.v, t\_4\right), \mathsf{fma}\left(t\_2 \cdot dY.u, \left\lfloor w\right\rfloor , \left(t\_0 \cdot dY.v\right) \cdot dY.v\right)\right)}}\\
\mathbf{else}:\\
\;\;\;\;\left\lfloor w\right\rfloor \cdot \frac{dY.u}{\sqrt{\mathsf{max}\left(\mathsf{fma}\left(t\_1, t\_1, t\_2 \cdot t\_2\right), \mathsf{fma}\left(t\_5, t\_5, t\_4\right)\right)}}\\
\end{array}
Initial program 77.2%
Applied rewrites77.2%
Applied rewrites77.4%
Taylor expanded in undef-var around zero
Applied rewrites43.0%
Applied rewrites43.0%
herbie shell --seed 2026086
(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))))