HairBSDF, Mp, upper

Percentage Accurate: 98.5% → 98.9%
Time: 14.2s
Alternatives: 18
Speedup: 1.0×

Specification

?
\[\left(\left(\left(\left(\left(-1 \leq cosTheta\_i \land cosTheta\_i \leq 1\right) \land \left(-1 \leq cosTheta\_O \land cosTheta\_O \leq 1\right)\right) \land \left(-1 \leq sinTheta\_i \land sinTheta\_i \leq 1\right)\right) \land \left(-1 \leq sinTheta\_O \land sinTheta\_O \leq 1\right)\right) \land 0.1 < v\right) \land v \leq 1.5707964\]
\[\begin{array}{l} \\ \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (* (exp (- (/ (* sinTheta_i sinTheta_O) v))) (/ (* cosTheta_i cosTheta_O) v))
  (* (* (sinh (/ 1.0 v)) 2.0) v)))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (expf(-((sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i * cosTheta_O) / v)) / ((sinhf((1.0f / v)) * 2.0f) * v);
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (exp(-((sintheta_i * sintheta_o) / v)) * ((costheta_i * costheta_o) / v)) / ((sinh((1.0e0 / v)) * 2.0e0) * v)
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(exp(Float32(-Float32(Float32(sinTheta_i * sinTheta_O) / v))) * Float32(Float32(cosTheta_i * cosTheta_O) / v)) / Float32(Float32(sinh(Float32(Float32(1.0) / v)) * Float32(2.0)) * v))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (exp(-((sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i * cosTheta_O) / v)) / ((sinh((single(1.0) / v)) * single(2.0)) * v);
end
\begin{array}{l}

\\
\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}
\end{array}

Sampling outcomes in binary32 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 18 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 98.5% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (* (exp (- (/ (* sinTheta_i sinTheta_O) v))) (/ (* cosTheta_i cosTheta_O) v))
  (* (* (sinh (/ 1.0 v)) 2.0) v)))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (expf(-((sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i * cosTheta_O) / v)) / ((sinhf((1.0f / v)) * 2.0f) * v);
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (exp(-((sintheta_i * sintheta_o) / v)) * ((costheta_i * costheta_o) / v)) / ((sinh((1.0e0 / v)) * 2.0e0) * v)
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(exp(Float32(-Float32(Float32(sinTheta_i * sinTheta_O) / v))) * Float32(Float32(cosTheta_i * cosTheta_O) / v)) / Float32(Float32(sinh(Float32(Float32(1.0) / v)) * Float32(2.0)) * v))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (exp(-((sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i * cosTheta_O) / v)) / ((sinh((single(1.0) / v)) * single(2.0)) * v);
end
\begin{array}{l}

\\
\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}
\end{array}

Alternative 1: 98.9% accurate, 0.7× speedup?

\[\begin{array}{l} \\ cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \frac{-0.5}{v}}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (*
  cosTheta_i
  (*
   (* (/ (* (/ 1.0 v) (/ -0.5 v)) (sinh (/ -1.0 v))) cosTheta_O)
   (pow (exp sinTheta_O) (/ (- sinTheta_i) v)))))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return cosTheta_i * (((((1.0f / v) * (-0.5f / v)) / sinhf((-1.0f / v))) * cosTheta_O) * powf(expf(sinTheta_O), (-sinTheta_i / v)));
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = costheta_i * (((((1.0e0 / v) * ((-0.5e0) / v)) / sinh(((-1.0e0) / v))) * costheta_o) * (exp(sintheta_o) ** (-sintheta_i / v)))
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(cosTheta_i * Float32(Float32(Float32(Float32(Float32(Float32(1.0) / v) * Float32(Float32(-0.5) / v)) / sinh(Float32(Float32(-1.0) / v))) * cosTheta_O) * (exp(sinTheta_O) ^ Float32(Float32(-sinTheta_i) / v))))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = cosTheta_i * (((((single(1.0) / v) * (single(-0.5) / v)) / sinh((single(-1.0) / v))) * cosTheta_O) * (exp(sinTheta_O) ^ (-sinTheta_i / v)));
end
\begin{array}{l}

\\
cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \frac{-0.5}{v}}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right)
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. associate-/l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_i \cdot \frac{cosTheta\_O}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(cosTheta\_i \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_O}}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. un-div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-/.f3298.7

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i}{\color{blue}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.7%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Applied rewrites98.7%

    \[\leadsto \color{blue}{cosTheta\_i \cdot \left(\frac{\frac{cosTheta\_O}{v}}{\left(-2 \cdot v\right) \cdot \sinh \left(\frac{-1}{v}\right)} \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right)} \]
  6. Applied rewrites98.9%

    \[\leadsto cosTheta\_i \cdot \left(\color{blue}{\left(\left(\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)} \cdot \frac{1}{v}\right) \cdot cosTheta\_O\right)} \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
  7. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\color{blue}{\left(\frac{\frac{\frac{1}{2}}{v}}{\sinh \left(\frac{1}{v}\right)} \cdot \frac{1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    2. *-commutativeN/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\color{blue}{\left(\frac{1}{v} \cdot \frac{\frac{\frac{1}{2}}{v}}{\sinh \left(\frac{1}{v}\right)}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    3. lift-/.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\left(\frac{1}{v} \cdot \color{blue}{\frac{\frac{\frac{1}{2}}{v}}{\sinh \left(\frac{1}{v}\right)}}\right) \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    4. frac-2negN/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\left(\frac{1}{v} \cdot \color{blue}{\frac{\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)}{\mathsf{neg}\left(\sinh \left(\frac{1}{v}\right)\right)}}\right) \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    5. associate-*r/N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\color{blue}{\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\mathsf{neg}\left(\sinh \left(\frac{1}{v}\right)\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    6. lift-sinh.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\mathsf{neg}\left(\color{blue}{\sinh \left(\frac{1}{v}\right)}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    7. sinh-negN/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\color{blue}{\sinh \left(\mathsf{neg}\left(\frac{1}{v}\right)\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    8. neg-mul-1N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\sinh \color{blue}{\left(-1 \cdot \frac{1}{v}\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    9. lift-/.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\sinh \left(-1 \cdot \color{blue}{\frac{1}{v}}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    10. div-invN/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\sinh \color{blue}{\left(\frac{-1}{v}\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    11. lift-/.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\sinh \color{blue}{\left(\frac{-1}{v}\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    12. lift-sinh.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\color{blue}{\sinh \left(\frac{-1}{v}\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    13. lower-/.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\color{blue}{\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}{\sinh \left(\frac{-1}{v}\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    14. lower-*.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\color{blue}{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\frac{\frac{1}{2}}{v}\right)\right)}}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    15. lift-/.f32N/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \left(\mathsf{neg}\left(\color{blue}{\frac{\frac{1}{2}}{v}}\right)\right)}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    16. distribute-neg-fracN/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \color{blue}{\frac{\mathsf{neg}\left(\frac{1}{2}\right)}{v}}}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    17. metadata-evalN/A

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \frac{\color{blue}{\frac{-1}{2}}}{v}}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
    18. lower-/.f3299.0

      \[\leadsto cosTheta\_i \cdot \left(\left(\frac{\frac{1}{v} \cdot \color{blue}{\frac{-0.5}{v}}}{\sinh \left(\frac{-1}{v}\right)} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
  8. Applied rewrites99.0%

    \[\leadsto cosTheta\_i \cdot \left(\left(\color{blue}{\frac{\frac{1}{v} \cdot \frac{-0.5}{v}}{\sinh \left(\frac{-1}{v}\right)}} \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
  9. Add Preprocessing

Alternative 2: 98.9% accurate, 0.7× speedup?

\[\begin{array}{l} \\ cosTheta\_i \cdot \left(\left(\left(\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)} \cdot \frac{1}{v}\right) \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (*
  cosTheta_i
  (*
   (* (* (/ (/ 0.5 v) (sinh (/ 1.0 v))) (/ 1.0 v)) cosTheta_O)
   (pow (exp sinTheta_O) (/ (- sinTheta_i) v)))))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return cosTheta_i * (((((0.5f / v) / sinhf((1.0f / v))) * (1.0f / v)) * cosTheta_O) * powf(expf(sinTheta_O), (-sinTheta_i / v)));
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = costheta_i * (((((0.5e0 / v) / sinh((1.0e0 / v))) * (1.0e0 / v)) * costheta_o) * (exp(sintheta_o) ** (-sintheta_i / v)))
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(cosTheta_i * Float32(Float32(Float32(Float32(Float32(Float32(0.5) / v) / sinh(Float32(Float32(1.0) / v))) * Float32(Float32(1.0) / v)) * cosTheta_O) * (exp(sinTheta_O) ^ Float32(Float32(-sinTheta_i) / v))))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = cosTheta_i * (((((single(0.5) / v) / sinh((single(1.0) / v))) * (single(1.0) / v)) * cosTheta_O) * (exp(sinTheta_O) ^ (-sinTheta_i / v)));
end
\begin{array}{l}

\\
cosTheta\_i \cdot \left(\left(\left(\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)} \cdot \frac{1}{v}\right) \cdot cosTheta\_O\right) \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right)
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. associate-/l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_i \cdot \frac{cosTheta\_O}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(cosTheta\_i \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_O}}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. un-div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-/.f3298.7

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i}{\color{blue}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.7%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Applied rewrites98.7%

    \[\leadsto \color{blue}{cosTheta\_i \cdot \left(\frac{\frac{cosTheta\_O}{v}}{\left(-2 \cdot v\right) \cdot \sinh \left(\frac{-1}{v}\right)} \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right)} \]
  6. Applied rewrites98.9%

    \[\leadsto cosTheta\_i \cdot \left(\color{blue}{\left(\left(\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)} \cdot \frac{1}{v}\right) \cdot cosTheta\_O\right)} \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right) \]
  7. Add Preprocessing

Alternative 3: 98.7% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{1}{\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)}}} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (* (exp (/ (* (- sinTheta_i) sinTheta_O) v)) (* (/ cosTheta_i v) cosTheta_O))
  (/ 1.0 (/ (/ 0.5 v) (sinh (/ 1.0 v))))))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (expf(((-sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i / v) * cosTheta_O)) / (1.0f / ((0.5f / v) / sinhf((1.0f / v))));
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (exp(((-sintheta_i * sintheta_o) / v)) * ((costheta_i / v) * costheta_o)) / (1.0e0 / ((0.5e0 / v) / sinh((1.0e0 / v))))
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(exp(Float32(Float32(Float32(-sinTheta_i) * sinTheta_O) / v)) * Float32(Float32(cosTheta_i / v) * cosTheta_O)) / Float32(Float32(1.0) / Float32(Float32(Float32(0.5) / v) / sinh(Float32(Float32(1.0) / v)))))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (exp(((-sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i / v) * cosTheta_O)) / (single(1.0) / ((single(0.5) / v) / sinh((single(1.0) / v))));
end
\begin{array}{l}

\\
\frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{1}{\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)}}}
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. associate-/l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_O \cdot \frac{cosTheta\_i}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-/.f3298.7

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\color{blue}{\frac{cosTheta\_i}{v}} \cdot cosTheta\_O\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.7%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right)} \cdot v} \]
    3. associate-*l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\sinh \left(\frac{1}{v}\right) \cdot \left(2 \cdot v\right)}} \]
    4. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \color{blue}{\left(v \cdot 2\right)}} \]
    5. metadata-evalN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \left(v \cdot \color{blue}{\frac{1}{\frac{1}{2}}}\right)} \]
    6. div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \color{blue}{\frac{v}{\frac{1}{2}}}} \]
    7. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \color{blue}{\frac{1}{\frac{\frac{1}{2}}{v}}}} \]
    8. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \frac{1}{\color{blue}{\frac{\frac{1}{2}}{v}}}} \]
    9. div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{\frac{1}{2}}{v}}}} \]
    10. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{1}{\frac{\frac{\frac{1}{2}}{v}}{\sinh \left(\frac{1}{v}\right)}}}} \]
    11. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{1}{\color{blue}{\frac{\frac{\frac{1}{2}}{v}}{\sinh \left(\frac{1}{v}\right)}}}} \]
    12. lower-/.f3298.9

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{1}{\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)}}}} \]
  6. Applied rewrites98.9%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{1}{\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)}}}} \]
  7. Final simplification98.9%

    \[\leadsto \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{1}{\frac{\frac{0.5}{v}}{\sinh \left(\frac{1}{v}\right)}}} \]
  8. Add Preprocessing

Alternative 4: 98.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{0.5}{v}}} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (* (exp (/ (* (- sinTheta_i) sinTheta_O) v)) (* (/ cosTheta_i v) cosTheta_O))
  (/ (sinh (/ 1.0 v)) (/ 0.5 v))))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (expf(((-sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i / v) * cosTheta_O)) / (sinhf((1.0f / v)) / (0.5f / v));
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (exp(((-sintheta_i * sintheta_o) / v)) * ((costheta_i / v) * costheta_o)) / (sinh((1.0e0 / v)) / (0.5e0 / v))
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(exp(Float32(Float32(Float32(-sinTheta_i) * sinTheta_O) / v)) * Float32(Float32(cosTheta_i / v) * cosTheta_O)) / Float32(sinh(Float32(Float32(1.0) / v)) / Float32(Float32(0.5) / v)))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (exp(((-sinTheta_i * sinTheta_O) / v)) * ((cosTheta_i / v) * cosTheta_O)) / (sinh((single(1.0) / v)) / (single(0.5) / v));
end
\begin{array}{l}

\\
\frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{0.5}{v}}}
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. associate-/l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_O \cdot \frac{cosTheta\_i}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-/.f3298.7

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\color{blue}{\frac{cosTheta\_i}{v}} \cdot cosTheta\_O\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.7%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right)} \cdot v} \]
    3. associate-*l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\sinh \left(\frac{1}{v}\right) \cdot \left(2 \cdot v\right)}} \]
    4. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \color{blue}{\left(v \cdot 2\right)}} \]
    5. metadata-evalN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \left(v \cdot \color{blue}{\frac{1}{\frac{1}{2}}}\right)} \]
    6. div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \color{blue}{\frac{v}{\frac{1}{2}}}} \]
    7. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \color{blue}{\frac{1}{\frac{\frac{1}{2}}{v}}}} \]
    8. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\sinh \left(\frac{1}{v}\right) \cdot \frac{1}{\color{blue}{\frac{\frac{1}{2}}{v}}}} \]
    9. div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{\frac{1}{2}}{v}}}} \]
    10. lower-/.f3298.9

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{0.5}{v}}}} \]
  6. Applied rewrites98.9%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\color{blue}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{0.5}{v}}}} \]
  7. Final simplification98.9%

    \[\leadsto \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)}{\frac{\sinh \left(\frac{1}{v}\right)}{\frac{0.5}{v}}} \]
  8. Add Preprocessing

Alternative 5: 98.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (*
   (exp (/ (* (- sinTheta_i) sinTheta_O) v))
   (* (/ 1.0 v) (* cosTheta_O cosTheta_i)))
  (* (* (sinh (/ 1.0 v)) 2.0) v)))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (expf(((-sinTheta_i * sinTheta_O) / v)) * ((1.0f / v) * (cosTheta_O * cosTheta_i))) / ((sinhf((1.0f / v)) * 2.0f) * v);
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (exp(((-sintheta_i * sintheta_o) / v)) * ((1.0e0 / v) * (costheta_o * costheta_i))) / ((sinh((1.0e0 / v)) * 2.0e0) * v)
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(exp(Float32(Float32(Float32(-sinTheta_i) * sinTheta_O) / v)) * Float32(Float32(Float32(1.0) / v) * Float32(cosTheta_O * cosTheta_i))) / Float32(Float32(sinh(Float32(Float32(1.0) / v)) * Float32(2.0)) * v))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (exp(((-sinTheta_i * sinTheta_O) / v)) * ((single(1.0) / v) * (cosTheta_O * cosTheta_i))) / ((sinh((single(1.0) / v)) * single(2.0)) * v);
end
\begin{array}{l}

\\
\frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_i \cdot cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. associate-/r/N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{1}{v} \cdot \left(cosTheta\_i \cdot cosTheta\_O\right)\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\color{blue}{\frac{1}{v}} \cdot \left(cosTheta\_i \cdot cosTheta\_O\right)\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. lower-*.f3298.8

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{1}{v} \cdot \left(cosTheta\_i \cdot cosTheta\_O\right)\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \color{blue}{\left(cosTheta\_i \cdot cosTheta\_O\right)}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \color{blue}{\left(cosTheta\_O \cdot cosTheta\_i\right)}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    8. lower-*.f3298.8

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \color{blue}{\left(cosTheta\_O \cdot cosTheta\_i\right)}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.8%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{1}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Final simplification98.8%

    \[\leadsto \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  6. Add Preprocessing

Alternative 6: 98.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\left(\frac{1}{v} \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (*
   (exp (/ (* (- sinTheta_i) sinTheta_O) v))
   (* (* (/ 1.0 v) cosTheta_i) cosTheta_O))
  (* (* (sinh (/ 1.0 v)) 2.0) v)))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (expf(((-sinTheta_i * sinTheta_O) / v)) * (((1.0f / v) * cosTheta_i) * cosTheta_O)) / ((sinhf((1.0f / v)) * 2.0f) * v);
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (exp(((-sintheta_i * sintheta_o) / v)) * (((1.0e0 / v) * costheta_i) * costheta_o)) / ((sinh((1.0e0 / v)) * 2.0e0) * v)
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(exp(Float32(Float32(Float32(-sinTheta_i) * sinTheta_O) / v)) * Float32(Float32(Float32(Float32(1.0) / v) * cosTheta_i) * cosTheta_O)) / Float32(Float32(sinh(Float32(Float32(1.0) / v)) * Float32(2.0)) * v))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (exp(((-sinTheta_i * sinTheta_O) / v)) * (((single(1.0) / v) * cosTheta_i) * cosTheta_O)) / ((sinh((single(1.0) / v)) * single(2.0)) * v);
end
\begin{array}{l}

\\
\frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\left(\frac{1}{v} \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. associate-/l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_i \cdot \frac{cosTheta\_O}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(cosTheta\_i \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_O}}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. un-div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-/.f3298.7

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i}{\color{blue}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.7%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. *-lft-identityN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{1 \cdot cosTheta\_i}}{\frac{v}{cosTheta\_O}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. associate-*l/N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{1}{\frac{v}{cosTheta\_O}} \cdot cosTheta\_i\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{\color{blue}{\frac{v}{cosTheta\_O}}} \cdot cosTheta\_i\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. associate-/r/N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\color{blue}{\left(\frac{1}{v} \cdot cosTheta\_O\right)} \cdot cosTheta\_i\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\left(\color{blue}{\frac{1}{v}} \cdot cosTheta\_O\right) \cdot cosTheta\_i\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. associate-*r*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\frac{1}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    8. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\frac{1}{v} \cdot \color{blue}{\left(cosTheta\_i \cdot cosTheta\_O\right)}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    9. associate-*r*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\left(\frac{1}{v} \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    10. lower-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\left(\frac{1}{v} \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    11. lower-*.f3298.8

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(\color{blue}{\left(\frac{1}{v} \cdot cosTheta\_i\right)} \cdot cosTheta\_O\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  6. Applied rewrites98.8%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(\left(\frac{1}{v} \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  7. Final simplification98.8%

    \[\leadsto \frac{e^{\frac{\left(-sinTheta\_i\right) \cdot sinTheta\_O}{v}} \cdot \left(\left(\frac{1}{v} \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  8. Add Preprocessing

Alternative 7: 98.5% accurate, 1.6× speedup?

\[\begin{array}{l} \\ \frac{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - cosTheta\_i \cdot \frac{sinTheta\_O \cdot sinTheta\_i}{v}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (/
  (*
   (/ cosTheta_O v)
   (- cosTheta_i (* cosTheta_i (/ (* sinTheta_O sinTheta_i) v))))
  (* (* (sinh (/ 1.0 v)) 2.0) v)))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return ((cosTheta_O / v) * (cosTheta_i - (cosTheta_i * ((sinTheta_O * sinTheta_i) / v)))) / ((sinhf((1.0f / v)) * 2.0f) * v);
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = ((costheta_o / v) * (costheta_i - (costheta_i * ((sintheta_o * sintheta_i) / v)))) / ((sinh((1.0e0 / v)) * 2.0e0) * v)
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(Float32(cosTheta_O / v) * Float32(cosTheta_i - Float32(cosTheta_i * Float32(Float32(sinTheta_O * sinTheta_i) / v)))) / Float32(Float32(sinh(Float32(Float32(1.0) / v)) * Float32(2.0)) * v))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = ((cosTheta_O / v) * (cosTheta_i - (cosTheta_i * ((sinTheta_O * sinTheta_i) / v)))) / ((sinh((single(1.0) / v)) * single(2.0)) * v);
end
\begin{array}{l}

\\
\frac{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - cosTheta\_i \cdot \frac{sinTheta\_O \cdot sinTheta\_i}{v}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v}
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_i \cdot cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. inv-powN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{{\left(\frac{v}{cosTheta\_i \cdot cosTheta\_O}\right)}^{-1}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. pow-to-expN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{e^{\log \left(\frac{v}{cosTheta\_i \cdot cosTheta\_O}\right) \cdot -1}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. lower-exp.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{e^{\log \left(\frac{v}{cosTheta\_i \cdot cosTheta\_O}\right) \cdot -1}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot e^{\color{blue}{\log \left(\frac{v}{cosTheta\_i \cdot cosTheta\_O}\right) \cdot -1}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-log.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot e^{\color{blue}{\log \left(\frac{v}{cosTheta\_i \cdot cosTheta\_O}\right)} \cdot -1}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    8. lower-/.f3250.4

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot e^{\log \color{blue}{\left(\frac{v}{cosTheta\_i \cdot cosTheta\_O}\right)} \cdot -1}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    9. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot e^{\log \left(\frac{v}{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}\right) \cdot -1}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    10. *-commutativeN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot e^{\log \left(\frac{v}{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}\right) \cdot -1}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    11. lower-*.f3250.4

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot e^{\log \left(\frac{v}{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}\right) \cdot -1}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites50.4%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{e^{\log \left(\frac{v}{cosTheta\_O \cdot cosTheta\_i}\right) \cdot -1}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Taylor expanded in sinTheta_i around 0

    \[\leadsto \frac{\color{blue}{-1 \cdot \frac{cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)}{{v}^{2}} + \frac{cosTheta\_O \cdot cosTheta\_i}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  6. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \frac{\color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v} + -1 \cdot \frac{cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)}{{v}^{2}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. mul-1-negN/A

      \[\leadsto \frac{\frac{cosTheta\_O \cdot cosTheta\_i}{v} + \color{blue}{\left(\mathsf{neg}\left(\frac{cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)}{{v}^{2}}\right)\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. unsub-negN/A

      \[\leadsto \frac{\color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v} - \frac{cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)}{{v}^{2}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. *-commutativeN/A

      \[\leadsto \frac{\frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v} - \frac{cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)}{{v}^{2}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. associate-/l*N/A

      \[\leadsto \frac{\color{blue}{cosTheta\_i \cdot \frac{cosTheta\_O}{v}} - \frac{cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)}{{v}^{2}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. *-commutativeN/A

      \[\leadsto \frac{cosTheta\_i \cdot \frac{cosTheta\_O}{v} - \frac{\color{blue}{\left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right) \cdot cosTheta\_O}}{{v}^{2}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. unpow2N/A

      \[\leadsto \frac{cosTheta\_i \cdot \frac{cosTheta\_O}{v} - \frac{\left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right) \cdot cosTheta\_O}{\color{blue}{v \cdot v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    8. times-fracN/A

      \[\leadsto \frac{cosTheta\_i \cdot \frac{cosTheta\_O}{v} - \color{blue}{\frac{cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)}{v} \cdot \frac{cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    9. distribute-rgt-out--N/A

      \[\leadsto \frac{\color{blue}{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - \frac{cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    10. lower-*.f32N/A

      \[\leadsto \frac{\color{blue}{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - \frac{cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    11. lower-/.f32N/A

      \[\leadsto \frac{\color{blue}{\frac{cosTheta\_O}{v}} \cdot \left(cosTheta\_i - \frac{cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)}{v}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    12. lower--.f32N/A

      \[\leadsto \frac{\frac{cosTheta\_O}{v} \cdot \color{blue}{\left(cosTheta\_i - \frac{cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    13. associate-/l*N/A

      \[\leadsto \frac{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - \color{blue}{cosTheta\_i \cdot \frac{sinTheta\_O \cdot sinTheta\_i}{v}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    14. lower-*.f32N/A

      \[\leadsto \frac{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - \color{blue}{cosTheta\_i \cdot \frac{sinTheta\_O \cdot sinTheta\_i}{v}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    15. lower-/.f32N/A

      \[\leadsto \frac{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - cosTheta\_i \cdot \color{blue}{\frac{sinTheta\_O \cdot sinTheta\_i}{v}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    16. lower-*.f3298.7

      \[\leadsto \frac{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - cosTheta\_i \cdot \frac{\color{blue}{sinTheta\_O \cdot sinTheta\_i}}{v}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  7. Applied rewrites98.7%

    \[\leadsto \frac{\color{blue}{\frac{cosTheta\_O}{v} \cdot \left(cosTheta\_i - cosTheta\_i \cdot \frac{sinTheta\_O \cdot sinTheta\_i}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  8. Add Preprocessing

Alternative 8: 98.1% accurate, 1.7× speedup?

\[\begin{array}{l} \\ \frac{1}{v} \cdot \left(\frac{-0.5}{\sinh \left(\frac{-1}{v}\right)} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)\right) \end{array} \]
(FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
 :precision binary32
 (* (/ 1.0 v) (* (/ -0.5 (sinh (/ -1.0 v))) (* (/ cosTheta_i v) cosTheta_O))))
float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
	return (1.0f / v) * ((-0.5f / sinhf((-1.0f / v))) * ((cosTheta_i / v) * cosTheta_O));
}
real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
    real(4), intent (in) :: costheta_i
    real(4), intent (in) :: costheta_o
    real(4), intent (in) :: sintheta_i
    real(4), intent (in) :: sintheta_o
    real(4), intent (in) :: v
    code = (1.0e0 / v) * (((-0.5e0) / sinh(((-1.0e0) / v))) * ((costheta_i / v) * costheta_o))
end function
function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	return Float32(Float32(Float32(1.0) / v) * Float32(Float32(Float32(-0.5) / sinh(Float32(Float32(-1.0) / v))) * Float32(Float32(cosTheta_i / v) * cosTheta_O)))
end
function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
	tmp = (single(1.0) / v) * ((single(-0.5) / sinh((single(-1.0) / v))) * ((cosTheta_i / v) * cosTheta_O));
end
\begin{array}{l}

\\
\frac{1}{v} \cdot \left(\frac{-0.5}{\sinh \left(\frac{-1}{v}\right)} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)\right)
\end{array}
Derivation
  1. Initial program 98.7%

    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    3. associate-/l*N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_i \cdot \frac{cosTheta\_O}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    4. clear-numN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(cosTheta\_i \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_O}}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    5. un-div-invN/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    6. lower-/.f32N/A

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    7. lower-/.f3298.7

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i}{\color{blue}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  4. Applied rewrites98.7%

    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
  5. Applied rewrites98.7%

    \[\leadsto \color{blue}{cosTheta\_i \cdot \left(\frac{\frac{cosTheta\_O}{v}}{\left(-2 \cdot v\right) \cdot \sinh \left(\frac{-1}{v}\right)} \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right)} \]
  6. Applied rewrites98.5%

    \[\leadsto \color{blue}{\frac{{\left(e^{sinTheta\_i}\right)}^{\left(\frac{-sinTheta\_O}{v}\right)}}{v} \cdot \left(\frac{-0.5}{\sinh \left(\frac{-1}{v}\right)} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)\right)} \]
  7. Taylor expanded in sinTheta_i around 0

    \[\leadsto \frac{\color{blue}{1}}{v} \cdot \left(\frac{\frac{-1}{2}}{\sinh \left(\frac{-1}{v}\right)} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)\right) \]
  8. Step-by-step derivation
    1. Applied rewrites98.1%

      \[\leadsto \frac{\color{blue}{1}}{v} \cdot \left(\frac{-0.5}{\sinh \left(\frac{-1}{v}\right)} \cdot \left(\frac{cosTheta\_i}{v} \cdot cosTheta\_O\right)\right) \]
    2. Add Preprocessing

    Alternative 9: 58.5% accurate, 2.0× speedup?

    \[\begin{array}{l} \\ 0.5 \cdot \left(\frac{1}{v} \cdot {\left(\frac{1}{cosTheta\_O \cdot cosTheta\_i}\right)}^{-1}\right) \end{array} \]
    (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
     :precision binary32
     (* 0.5 (* (/ 1.0 v) (pow (/ 1.0 (* cosTheta_O cosTheta_i)) -1.0))))
    float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
    	return 0.5f * ((1.0f / v) * powf((1.0f / (cosTheta_O * cosTheta_i)), -1.0f));
    }
    
    real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
        real(4), intent (in) :: costheta_i
        real(4), intent (in) :: costheta_o
        real(4), intent (in) :: sintheta_i
        real(4), intent (in) :: sintheta_o
        real(4), intent (in) :: v
        code = 0.5e0 * ((1.0e0 / v) * ((1.0e0 / (costheta_o * costheta_i)) ** (-1.0e0)))
    end function
    
    function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
    	return Float32(Float32(0.5) * Float32(Float32(Float32(1.0) / v) * (Float32(Float32(1.0) / Float32(cosTheta_O * cosTheta_i)) ^ Float32(-1.0))))
    end
    
    function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
    	tmp = single(0.5) * ((single(1.0) / v) * ((single(1.0) / (cosTheta_O * cosTheta_i)) ^ single(-1.0)));
    end
    
    \begin{array}{l}
    
    \\
    0.5 \cdot \left(\frac{1}{v} \cdot {\left(\frac{1}{cosTheta\_O \cdot cosTheta\_i}\right)}^{-1}\right)
    \end{array}
    
    Derivation
    1. Initial program 98.7%

      \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
    2. Add Preprocessing
    3. Taylor expanded in v around inf

      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
    4. Step-by-step derivation
      1. Applied rewrites61.2%

        \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
      2. Taylor expanded in v around inf

        \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
      3. Step-by-step derivation
        1. lower-*.f32N/A

          \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
        2. lower-/.f32N/A

          \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
        3. lower-*.f3261.2

          \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
      4. Applied rewrites61.2%

        \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
      5. Step-by-step derivation
        1. Applied rewrites61.7%

          \[\leadsto 0.5 \cdot \left(\frac{1}{v} \cdot \color{blue}{{\left(\frac{1}{cosTheta\_O \cdot cosTheta\_i}\right)}^{-1}}\right) \]
        2. Add Preprocessing

        Alternative 10: 58.4% accurate, 7.6× speedup?

        \[\begin{array}{l} \\ \frac{-0.5}{\frac{\frac{-v}{cosTheta\_O}}{cosTheta\_i}} \end{array} \]
        (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
         :precision binary32
         (/ -0.5 (/ (/ (- v) cosTheta_O) cosTheta_i)))
        float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
        	return -0.5f / ((-v / cosTheta_O) / cosTheta_i);
        }
        
        real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
            real(4), intent (in) :: costheta_i
            real(4), intent (in) :: costheta_o
            real(4), intent (in) :: sintheta_i
            real(4), intent (in) :: sintheta_o
            real(4), intent (in) :: v
            code = (-0.5e0) / ((-v / costheta_o) / costheta_i)
        end function
        
        function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
        	return Float32(Float32(-0.5) / Float32(Float32(Float32(-v) / cosTheta_O) / cosTheta_i))
        end
        
        function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
        	tmp = single(-0.5) / ((-v / cosTheta_O) / cosTheta_i);
        end
        
        \begin{array}{l}
        
        \\
        \frac{-0.5}{\frac{\frac{-v}{cosTheta\_O}}{cosTheta\_i}}
        \end{array}
        
        Derivation
        1. Initial program 98.7%

          \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
        2. Add Preprocessing
        3. Taylor expanded in v around inf

          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
        4. Step-by-step derivation
          1. Applied rewrites61.2%

            \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
          2. Taylor expanded in v around inf

            \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
          3. Step-by-step derivation
            1. lower-*.f32N/A

              \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
            2. lower-/.f32N/A

              \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
            3. lower-*.f3261.2

              \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
          4. Applied rewrites61.2%

            \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
          5. Step-by-step derivation
            1. Applied rewrites61.6%

              \[\leadsto \frac{-0.5}{\color{blue}{\frac{\frac{-v}{cosTheta\_O}}{cosTheta\_i}}} \]
            2. Add Preprocessing

            Alternative 11: 58.4% accurate, 8.0× speedup?

            \[\begin{array}{l} \\ \frac{0.5}{\frac{\frac{v}{cosTheta\_i}}{cosTheta\_O}} \end{array} \]
            (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
             :precision binary32
             (/ 0.5 (/ (/ v cosTheta_i) cosTheta_O)))
            float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
            	return 0.5f / ((v / cosTheta_i) / cosTheta_O);
            }
            
            real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                real(4), intent (in) :: costheta_i
                real(4), intent (in) :: costheta_o
                real(4), intent (in) :: sintheta_i
                real(4), intent (in) :: sintheta_o
                real(4), intent (in) :: v
                code = 0.5e0 / ((v / costheta_i) / costheta_o)
            end function
            
            function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
            	return Float32(Float32(0.5) / Float32(Float32(v / cosTheta_i) / cosTheta_O))
            end
            
            function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
            	tmp = single(0.5) / ((v / cosTheta_i) / cosTheta_O);
            end
            
            \begin{array}{l}
            
            \\
            \frac{0.5}{\frac{\frac{v}{cosTheta\_i}}{cosTheta\_O}}
            \end{array}
            
            Derivation
            1. Initial program 98.7%

              \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
            2. Add Preprocessing
            3. Taylor expanded in v around inf

              \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
            4. Step-by-step derivation
              1. Applied rewrites61.2%

                \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
              2. Taylor expanded in v around inf

                \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
              3. Step-by-step derivation
                1. lower-*.f32N/A

                  \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                2. lower-/.f32N/A

                  \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                3. lower-*.f3261.2

                  \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
              4. Applied rewrites61.2%

                \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
              5. Step-by-step derivation
                1. Applied rewrites61.2%

                  \[\leadsto 0.5 \cdot \left(\frac{cosTheta\_O}{v} \cdot \color{blue}{cosTheta\_i}\right) \]
                2. Step-by-step derivation
                  1. Applied rewrites61.6%

                    \[\leadsto \frac{0.5}{\color{blue}{\frac{\frac{v}{cosTheta\_i}}{cosTheta\_O}}} \]
                  2. Add Preprocessing

                  Alternative 12: 58.4% accurate, 9.7× speedup?

                  \[\begin{array}{l} \\ \frac{0.5}{\frac{v}{cosTheta\_O \cdot cosTheta\_i}} \end{array} \]
                  (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                   :precision binary32
                   (/ 0.5 (/ v (* cosTheta_O cosTheta_i))))
                  float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                  	return 0.5f / (v / (cosTheta_O * cosTheta_i));
                  }
                  
                  real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                      real(4), intent (in) :: costheta_i
                      real(4), intent (in) :: costheta_o
                      real(4), intent (in) :: sintheta_i
                      real(4), intent (in) :: sintheta_o
                      real(4), intent (in) :: v
                      code = 0.5e0 / (v / (costheta_o * costheta_i))
                  end function
                  
                  function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                  	return Float32(Float32(0.5) / Float32(v / Float32(cosTheta_O * cosTheta_i)))
                  end
                  
                  function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                  	tmp = single(0.5) / (v / (cosTheta_O * cosTheta_i));
                  end
                  
                  \begin{array}{l}
                  
                  \\
                  \frac{0.5}{\frac{v}{cosTheta\_O \cdot cosTheta\_i}}
                  \end{array}
                  
                  Derivation
                  1. Initial program 98.7%

                    \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                  2. Add Preprocessing
                  3. Taylor expanded in v around inf

                    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                  4. Step-by-step derivation
                    1. Applied rewrites61.2%

                      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                    2. Taylor expanded in v around inf

                      \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                    3. Step-by-step derivation
                      1. lower-*.f32N/A

                        \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                      2. lower-/.f32N/A

                        \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                      3. lower-*.f3261.2

                        \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
                    4. Applied rewrites61.2%

                      \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                    5. Step-by-step derivation
                      1. Applied rewrites61.6%

                        \[\leadsto \frac{0.5}{\color{blue}{\frac{v}{cosTheta\_O \cdot cosTheta\_i}}} \]
                      2. Add Preprocessing

                      Alternative 13: 58.0% accurate, 11.3× speedup?

                      \[\begin{array}{l} \\ \frac{\left(-0.5 \cdot cosTheta\_i\right) \cdot cosTheta\_O}{-v} \end{array} \]
                      (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                       :precision binary32
                       (/ (* (* -0.5 cosTheta_i) cosTheta_O) (- v)))
                      float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                      	return ((-0.5f * cosTheta_i) * cosTheta_O) / -v;
                      }
                      
                      real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                          real(4), intent (in) :: costheta_i
                          real(4), intent (in) :: costheta_o
                          real(4), intent (in) :: sintheta_i
                          real(4), intent (in) :: sintheta_o
                          real(4), intent (in) :: v
                          code = (((-0.5e0) * costheta_i) * costheta_o) / -v
                      end function
                      
                      function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                      	return Float32(Float32(Float32(Float32(-0.5) * cosTheta_i) * cosTheta_O) / Float32(-v))
                      end
                      
                      function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                      	tmp = ((single(-0.5) * cosTheta_i) * cosTheta_O) / -v;
                      end
                      
                      \begin{array}{l}
                      
                      \\
                      \frac{\left(-0.5 \cdot cosTheta\_i\right) \cdot cosTheta\_O}{-v}
                      \end{array}
                      
                      Derivation
                      1. Initial program 98.7%

                        \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                      2. Add Preprocessing
                      3. Step-by-step derivation
                        1. lift-/.f32N/A

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i \cdot cosTheta\_O}{v}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        2. lift-*.f32N/A

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{\color{blue}{cosTheta\_i \cdot cosTheta\_O}}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        3. associate-/l*N/A

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\left(cosTheta\_i \cdot \frac{cosTheta\_O}{v}\right)}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        4. clear-numN/A

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \left(cosTheta\_i \cdot \color{blue}{\frac{1}{\frac{v}{cosTheta\_O}}}\right)}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        5. un-div-invN/A

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        6. lower-/.f32N/A

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        7. lower-/.f3298.7

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i}{\color{blue}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                      4. Applied rewrites98.7%

                        \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \color{blue}{\frac{cosTheta\_i}{\frac{v}{cosTheta\_O}}}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                      5. Applied rewrites98.7%

                        \[\leadsto \color{blue}{cosTheta\_i \cdot \left(\frac{\frac{cosTheta\_O}{v}}{\left(-2 \cdot v\right) \cdot \sinh \left(\frac{-1}{v}\right)} \cdot {\left(e^{sinTheta\_O}\right)}^{\left(\frac{-sinTheta\_i}{v}\right)}\right)} \]
                      6. Taylor expanded in v around -inf

                        \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{2} \cdot \left(cosTheta\_O \cdot \left(cosTheta\_i \cdot \left(sinTheta\_O \cdot sinTheta\_i\right)\right)\right) + \frac{1}{2} \cdot \frac{\frac{1}{2} \cdot \left(cosTheta\_O \cdot \left(cosTheta\_i \cdot \left({sinTheta\_O}^{2} \cdot {sinTheta\_i}^{2}\right)\right)\right) - \frac{1}{6} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)}{v}}{v} + \frac{-1}{2} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)}{v}} \]
                      7. Applied rewrites61.1%

                        \[\leadsto \color{blue}{\frac{-0.5 \cdot \left(cosTheta\_O \cdot cosTheta\_i\right) - \frac{\mathsf{fma}\left(\frac{\mathsf{fma}\left(-0.16666666666666666, cosTheta\_O \cdot cosTheta\_i, \left(\left(\left(\left(\left(sinTheta\_i \cdot sinTheta\_i\right) \cdot sinTheta\_O\right) \cdot sinTheta\_O\right) \cdot cosTheta\_i\right) \cdot cosTheta\_O\right) \cdot 0.5\right)}{v}, 0.5, -0.5 \cdot \left(\left(\left(sinTheta\_O \cdot sinTheta\_i\right) \cdot cosTheta\_i\right) \cdot cosTheta\_O\right)\right)}{v}}{-v}} \]
                      8. Taylor expanded in v around inf

                        \[\leadsto \frac{\frac{-1}{2} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)}{-\color{blue}{v}} \]
                      9. Step-by-step derivation
                        1. Applied rewrites61.3%

                          \[\leadsto \frac{\left(-0.5 \cdot cosTheta\_i\right) \cdot cosTheta\_O}{-\color{blue}{v}} \]
                        2. Add Preprocessing

                        Alternative 14: 58.0% accurate, 12.4× speedup?

                        \[\begin{array}{l} \\ \frac{\left(cosTheta\_O \cdot cosTheta\_i\right) \cdot 0.5}{v} \end{array} \]
                        (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                         :precision binary32
                         (/ (* (* cosTheta_O cosTheta_i) 0.5) v))
                        float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                        	return ((cosTheta_O * cosTheta_i) * 0.5f) / v;
                        }
                        
                        real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                            real(4), intent (in) :: costheta_i
                            real(4), intent (in) :: costheta_o
                            real(4), intent (in) :: sintheta_i
                            real(4), intent (in) :: sintheta_o
                            real(4), intent (in) :: v
                            code = ((costheta_o * costheta_i) * 0.5e0) / v
                        end function
                        
                        function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                        	return Float32(Float32(Float32(cosTheta_O * cosTheta_i) * Float32(0.5)) / v)
                        end
                        
                        function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                        	tmp = ((cosTheta_O * cosTheta_i) * single(0.5)) / v;
                        end
                        
                        \begin{array}{l}
                        
                        \\
                        \frac{\left(cosTheta\_O \cdot cosTheta\_i\right) \cdot 0.5}{v}
                        \end{array}
                        
                        Derivation
                        1. Initial program 98.7%

                          \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                        2. Add Preprocessing
                        3. Taylor expanded in v around inf

                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                        4. Step-by-step derivation
                          1. Applied rewrites61.2%

                            \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                          2. Taylor expanded in v around inf

                            \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                          3. Step-by-step derivation
                            1. lower-*.f32N/A

                              \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                            2. lower-/.f32N/A

                              \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                            3. lower-*.f3261.2

                              \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
                          4. Applied rewrites61.2%

                            \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                          5. Step-by-step derivation
                            1. Applied rewrites61.3%

                              \[\leadsto \frac{\left(cosTheta\_O \cdot cosTheta\_i\right) \cdot 0.5}{\color{blue}{v}} \]
                            2. Add Preprocessing

                            Alternative 15: 57.9% accurate, 12.4× speedup?

                            \[\begin{array}{l} \\ \frac{cosTheta\_i}{v} \cdot \left(0.5 \cdot cosTheta\_O\right) \end{array} \]
                            (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                             :precision binary32
                             (* (/ cosTheta_i v) (* 0.5 cosTheta_O)))
                            float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                            	return (cosTheta_i / v) * (0.5f * cosTheta_O);
                            }
                            
                            real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                                real(4), intent (in) :: costheta_i
                                real(4), intent (in) :: costheta_o
                                real(4), intent (in) :: sintheta_i
                                real(4), intent (in) :: sintheta_o
                                real(4), intent (in) :: v
                                code = (costheta_i / v) * (0.5e0 * costheta_o)
                            end function
                            
                            function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                            	return Float32(Float32(cosTheta_i / v) * Float32(Float32(0.5) * cosTheta_O))
                            end
                            
                            function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                            	tmp = (cosTheta_i / v) * (single(0.5) * cosTheta_O);
                            end
                            
                            \begin{array}{l}
                            
                            \\
                            \frac{cosTheta\_i}{v} \cdot \left(0.5 \cdot cosTheta\_O\right)
                            \end{array}
                            
                            Derivation
                            1. Initial program 98.7%

                              \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                            2. Add Preprocessing
                            3. Taylor expanded in v around inf

                              \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                            4. Step-by-step derivation
                              1. Applied rewrites61.2%

                                \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                              2. Taylor expanded in v around inf

                                \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                              3. Step-by-step derivation
                                1. lower-*.f32N/A

                                  \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                2. lower-/.f32N/A

                                  \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                3. lower-*.f3261.2

                                  \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
                              4. Applied rewrites61.2%

                                \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                              5. Step-by-step derivation
                                1. Applied rewrites61.2%

                                  \[\leadsto \frac{cosTheta\_i}{v} \cdot \color{blue}{\left(0.5 \cdot cosTheta\_O\right)} \]
                                2. Add Preprocessing

                                Alternative 16: 57.9% accurate, 12.4× speedup?

                                \[\begin{array}{l} \\ \frac{0.5}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right) \end{array} \]
                                (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                                 :precision binary32
                                 (* (/ 0.5 v) (* cosTheta_O cosTheta_i)))
                                float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                                	return (0.5f / v) * (cosTheta_O * cosTheta_i);
                                }
                                
                                real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                                    real(4), intent (in) :: costheta_i
                                    real(4), intent (in) :: costheta_o
                                    real(4), intent (in) :: sintheta_i
                                    real(4), intent (in) :: sintheta_o
                                    real(4), intent (in) :: v
                                    code = (0.5e0 / v) * (costheta_o * costheta_i)
                                end function
                                
                                function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                                	return Float32(Float32(Float32(0.5) / v) * Float32(cosTheta_O * cosTheta_i))
                                end
                                
                                function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                                	tmp = (single(0.5) / v) * (cosTheta_O * cosTheta_i);
                                end
                                
                                \begin{array}{l}
                                
                                \\
                                \frac{0.5}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)
                                \end{array}
                                
                                Derivation
                                1. Initial program 98.7%

                                  \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                                2. Add Preprocessing
                                3. Taylor expanded in v around inf

                                  \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                                4. Step-by-step derivation
                                  1. Applied rewrites61.2%

                                    \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                                  2. Taylor expanded in v around inf

                                    \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                  3. Step-by-step derivation
                                    1. lower-*.f32N/A

                                      \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                    2. lower-/.f32N/A

                                      \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                    3. lower-*.f3261.2

                                      \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
                                  4. Applied rewrites61.2%

                                    \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                  5. Step-by-step derivation
                                    1. Applied rewrites61.2%

                                      \[\leadsto \color{blue}{\frac{0.5}{v} \cdot \left(cosTheta\_O \cdot cosTheta\_i\right)} \]
                                    2. Add Preprocessing

                                    Alternative 17: 57.9% accurate, 12.4× speedup?

                                    \[\begin{array}{l} \\ 0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v} \end{array} \]
                                    (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                                     :precision binary32
                                     (* 0.5 (/ (* cosTheta_O cosTheta_i) v)))
                                    float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                                    	return 0.5f * ((cosTheta_O * cosTheta_i) / v);
                                    }
                                    
                                    real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                                        real(4), intent (in) :: costheta_i
                                        real(4), intent (in) :: costheta_o
                                        real(4), intent (in) :: sintheta_i
                                        real(4), intent (in) :: sintheta_o
                                        real(4), intent (in) :: v
                                        code = 0.5e0 * ((costheta_o * costheta_i) / v)
                                    end function
                                    
                                    function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                                    	return Float32(Float32(0.5) * Float32(Float32(cosTheta_O * cosTheta_i) / v))
                                    end
                                    
                                    function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                                    	tmp = single(0.5) * ((cosTheta_O * cosTheta_i) / v);
                                    end
                                    
                                    \begin{array}{l}
                                    
                                    \\
                                    0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}
                                    \end{array}
                                    
                                    Derivation
                                    1. Initial program 98.7%

                                      \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                                    2. Add Preprocessing
                                    3. Taylor expanded in v around inf

                                      \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                                    4. Step-by-step derivation
                                      1. Applied rewrites61.2%

                                        \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                                      2. Taylor expanded in v around inf

                                        \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                      3. Step-by-step derivation
                                        1. lower-*.f32N/A

                                          \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                        2. lower-/.f32N/A

                                          \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                        3. lower-*.f3261.2

                                          \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
                                      4. Applied rewrites61.2%

                                        \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                      5. Add Preprocessing

                                      Alternative 18: 57.9% accurate, 12.4× speedup?

                                      \[\begin{array}{l} \\ 0.5 \cdot \left(\frac{cosTheta\_O}{v} \cdot cosTheta\_i\right) \end{array} \]
                                      (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                                       :precision binary32
                                       (* 0.5 (* (/ cosTheta_O v) cosTheta_i)))
                                      float code(float cosTheta_i, float cosTheta_O, float sinTheta_i, float sinTheta_O, float v) {
                                      	return 0.5f * ((cosTheta_O / v) * cosTheta_i);
                                      }
                                      
                                      real(4) function code(costheta_i, costheta_o, sintheta_i, sintheta_o, v)
                                          real(4), intent (in) :: costheta_i
                                          real(4), intent (in) :: costheta_o
                                          real(4), intent (in) :: sintheta_i
                                          real(4), intent (in) :: sintheta_o
                                          real(4), intent (in) :: v
                                          code = 0.5e0 * ((costheta_o / v) * costheta_i)
                                      end function
                                      
                                      function code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                                      	return Float32(Float32(0.5) * Float32(Float32(cosTheta_O / v) * cosTheta_i))
                                      end
                                      
                                      function tmp = code(cosTheta_i, cosTheta_O, sinTheta_i, sinTheta_O, v)
                                      	tmp = single(0.5) * ((cosTheta_O / v) * cosTheta_i);
                                      end
                                      
                                      \begin{array}{l}
                                      
                                      \\
                                      0.5 \cdot \left(\frac{cosTheta\_O}{v} \cdot cosTheta\_i\right)
                                      \end{array}
                                      
                                      Derivation
                                      1. Initial program 98.7%

                                        \[\frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\left(\sinh \left(\frac{1}{v}\right) \cdot 2\right) \cdot v} \]
                                      2. Add Preprocessing
                                      3. Taylor expanded in v around inf

                                        \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                                      4. Step-by-step derivation
                                        1. Applied rewrites61.2%

                                          \[\leadsto \frac{e^{-\frac{sinTheta\_i \cdot sinTheta\_O}{v}} \cdot \frac{cosTheta\_i \cdot cosTheta\_O}{v}}{\color{blue}{2}} \]
                                        2. Taylor expanded in v around inf

                                          \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                        3. Step-by-step derivation
                                          1. lower-*.f32N/A

                                            \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                          2. lower-/.f32N/A

                                            \[\leadsto \frac{1}{2} \cdot \color{blue}{\frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                          3. lower-*.f3261.2

                                            \[\leadsto 0.5 \cdot \frac{\color{blue}{cosTheta\_O \cdot cosTheta\_i}}{v} \]
                                        4. Applied rewrites61.2%

                                          \[\leadsto \color{blue}{0.5 \cdot \frac{cosTheta\_O \cdot cosTheta\_i}{v}} \]
                                        5. Step-by-step derivation
                                          1. Applied rewrites61.2%

                                            \[\leadsto 0.5 \cdot \left(\frac{cosTheta\_O}{v} \cdot \color{blue}{cosTheta\_i}\right) \]
                                          2. Add Preprocessing

                                          Reproduce

                                          ?
                                          herbie shell --seed 2024307 
                                          (FPCore (cosTheta_i cosTheta_O sinTheta_i sinTheta_O v)
                                            :name "HairBSDF, Mp, upper"
                                            :precision binary32
                                            :pre (and (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))) (< 0.1 v)) (<= v 1.5707964))
                                            (/ (* (exp (- (/ (* sinTheta_i sinTheta_O) v))) (/ (* cosTheta_i cosTheta_O) v)) (* (* (sinh (/ 1.0 v)) 2.0) v)))