(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
:precision binary32
(exp
(+
(+
(-
(- (/ (* cosTheta_i cosTheta_O) v) (/ (* sinTheta_i sinTheta_O) v))
(/ 1.0 v))
0.6931)
(log (/ 1.0 (* 2.0 v))))))(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
:precision binary32
(let* ((t_0
(-
(fma cosTheta_O (/ cosTheta_i v) 0.6931)
(fma sinTheta_i (/ sinTheta_O v) (/ 1.0 v)))))
(*
(pow
(*
(*
(cbrt (exp (* 0.6666666666666666 (* 0.3333333333333333 t_0))))
(cbrt (cbrt (pow (cbrt (exp t_0)) 4.0))))
(cbrt (cbrt (exp (+ 0.6931 (/ (fma cosTheta_i cosTheta_O -1.0) v))))))
3.0)
(/ 0.5 v))))float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
return expf(((((((cosTheta_i * cosTheta_O) / v) - ((sinTheta_i * sinTheta_O) / v)) - (1.0f / v)) + 0.6931f) + logf((1.0f / (2.0f * v)))));
}
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
float t_0 = fmaf(cosTheta_O, (cosTheta_i / v), 0.6931f) - fmaf(sinTheta_i, (sinTheta_O / v), (1.0f / v));
return powf(((cbrtf(expf((0.6666666666666666f * (0.3333333333333333f * t_0)))) * cbrtf(cbrtf(powf(cbrtf(expf(t_0)), 4.0f)))) * cbrtf(cbrtf(expf((0.6931f + (fmaf(cosTheta_i, cosTheta_O, -1.0f) / v)))))), 3.0f) * (0.5f / v);
}
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v) return exp(Float32(Float32(Float32(Float32(Float32(Float32(cosTheta_i * cosTheta_O) / v) - Float32(Float32(sinTheta_i * sinTheta_O) / v)) - Float32(Float32(1.0) / v)) + Float32(0.6931)) + log(Float32(Float32(1.0) / Float32(Float32(2.0) * v))))) end
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v) t_0 = Float32(fma(cosTheta_O, Float32(cosTheta_i / v), Float32(0.6931)) - fma(sinTheta_i, Float32(sinTheta_O / v), Float32(Float32(1.0) / v))) return Float32((Float32(Float32(cbrt(exp(Float32(Float32(0.6666666666666666) * Float32(Float32(0.3333333333333333) * t_0)))) * cbrt(cbrt((cbrt(exp(t_0)) ^ Float32(4.0))))) * cbrt(cbrt(exp(Float32(Float32(0.6931) + Float32(fma(cosTheta_i, cosTheta_O, Float32(-1.0)) / v)))))) ^ Float32(3.0)) * Float32(Float32(0.5) / v)) end
e^{\left(\left(\left(\frac{cosTheta_i \cdot cosTheta_O}{v} - \frac{sinTheta_i \cdot sinTheta_O}{v}\right) - \frac{1}{v}\right) + 0.6931\right) + \log \left(\frac{1}{2 \cdot v}\right)}
\begin{array}{l}
t_0 := \mathsf{fma}\left(cosTheta_O, \frac{cosTheta_i}{v}, 0.6931\right) - \mathsf{fma}\left(sinTheta_i, \frac{sinTheta_O}{v}, \frac{1}{v}\right)\\
{\left(\left(\sqrt[3]{e^{0.6666666666666666 \cdot \left(0.3333333333333333 \cdot t_0\right)}} \cdot \sqrt[3]{\sqrt[3]{{\left(\sqrt[3]{e^{t_0}}\right)}^{4}}}\right) \cdot \sqrt[3]{\sqrt[3]{e^{0.6931 + \frac{\mathsf{fma}\left(cosTheta_i, cosTheta_O, -1\right)}{v}}}}\right)}^{3} \cdot \frac{0.5}{v}
\end{array}
Initial program 0.1
Simplified0.1
Applied egg-rr0.1
Applied egg-rr0.1
Applied egg-rr0.2
Taylor expanded in sinTheta_i around 0 0.2
Simplified0.2
Final simplification0.2
herbie shell --seed 2022185
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
:name "HairBSDF, Mp, lower"
:precision binary32
:pre (and (and (and (and (and (<= -1.0 cosTheta_i) (<= cosTheta_i 1.0)) (and (<= -1.0 cosTheta_O) (<= cosTheta_O 1.0))) (and (<= -1.0 sinTheta_i) (<= sinTheta_i 1.0))) (and (<= -1.0 sinTheta_O) (<= sinTheta_O 1.0))) (and (<= -1.5707964 v) (<= v 0.1)))
(exp (+ (+ (- (- (/ (* cosTheta_i cosTheta_O) v) (/ (* sinTheta_i sinTheta_O) v)) (/ 1.0 v)) 0.6931) (log (/ 1.0 (* 2.0 v))))))