Beckmann Sample, normalization factor

Percentage Accurate: 97.9% → 98.6%

Time: 17.3s

Alternatives: 8

Speedup: 1.5×

Specification

\[\left(0 < cosTheta \land cosTheta < 0.9999\right) \land \left(-1 < c \land c < 1\right)\]

Math

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (* (/ 1.0 (sqrt PI)) (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta))
    (exp (* (- cosTheta) cosTheta))))))

C

float code(float cosTheta, float c) {
	return 1.0f / ((1.0f + c) + (((1.0f / sqrtf(((float) M_PI))) * (sqrtf(((1.0f - cosTheta) - cosTheta)) / cosTheta)) * expf((-cosTheta * cosTheta))));
}

Julia

function code(cosTheta, c)
	return Float32(Float32(1.0) / Float32(Float32(Float32(1.0) + c) + Float32(Float32(Float32(Float32(1.0) / sqrt(Float32(pi))) * Float32(sqrt(Float32(Float32(Float32(1.0) - cosTheta) - cosTheta)) / cosTheta)) * exp(Float32(Float32(-cosTheta) * cosTheta)))))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = single(1.0) / ((single(1.0) + c) + (((single(1.0) / sqrt(single(pi))) * (sqrt(((single(1.0) - cosTheta) - cosTheta)) / cosTheta)) * exp((-cosTheta * cosTheta))));
end

Initial Program: 97.9% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (* (/ 1.0 (sqrt PI)) (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta))
    (exp (* (- cosTheta) cosTheta))))))

C

float code(float cosTheta, float c) {
	return 1.0f / ((1.0f + c) + (((1.0f / sqrtf(((float) M_PI))) * (sqrtf(((1.0f - cosTheta) - cosTheta)) / cosTheta)) * expf((-cosTheta * cosTheta))));
}

Julia

function code(cosTheta, c)
	return Float32(Float32(1.0) / Float32(Float32(Float32(1.0) + c) + Float32(Float32(Float32(Float32(1.0) / sqrt(Float32(pi))) * Float32(sqrt(Float32(Float32(Float32(1.0) - cosTheta) - cosTheta)) / cosTheta)) * exp(Float32(Float32(-cosTheta) * cosTheta)))))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = single(1.0) / ((single(1.0) + c) + (((single(1.0) / sqrt(single(pi))) * (sqrt(((single(1.0) - cosTheta) - cosTheta)) / cosTheta)) * exp((-cosTheta * cosTheta))));
end

Alternative 1: 98.6% accurate, 0.6× speedup

Math

\[\begin{array}{l} \\ \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{cosTheta \cdot \sqrt{\pi}}, {\left(e^{-cosTheta}\right)}^{cosTheta}, c\right)} \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   1.0
   (fma
    (/ (sqrt (+ 1.0 (* cosTheta -2.0))) (* cosTheta (sqrt PI)))
    (pow (exp (- cosTheta)) cosTheta)
    c))))

C

float code(float cosTheta, float c) {
	return 1.0f / (1.0f + fmaf((sqrtf((1.0f + (cosTheta * -2.0f))) / (cosTheta * sqrtf(((float) M_PI)))), powf(expf(-cosTheta), cosTheta), c));
}

Julia

function code(cosTheta, c)
	return Float32(Float32(1.0) / Float32(Float32(1.0) + fma(Float32(sqrt(Float32(Float32(1.0) + Float32(cosTheta * Float32(-2.0)))) / Float32(cosTheta * sqrt(Float32(pi)))), (exp(Float32(-cosTheta)) ^ cosTheta), c)))
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Step-by-step derivation

   1. associate-+l+ 97.8%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(c + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}\right)}} \]

   2. +-commutative 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\left(\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta} + c\right)}} \]

   3. fma-define 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\mathsf{fma}\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)}} \]

   4. times-frac 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\pi} \cdot cosTheta}}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   5. *-lft-identity 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   6. associate--l- 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   7. sub-neg 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 + \left(-\left(cosTheta + cosTheta\right)\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   8. neg-mul-1 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{-1 \cdot \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   9. distribute-lft-out 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{\left(-1 \cdot cosTheta + -1 \cdot cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   10. distribute-rgt-out 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{cosTheta \cdot \left(-1 + -1\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   11. metadata-eval 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot \color{blue}{-2}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   12. exp-prod 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, \color{blue}{{\left(e^{-cosTheta}\right)}^{cosTheta}}, c\right)} \]

3. Simplified 98.7%

   \[\leadsto \color{blue}{\frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, {\left(e^{-cosTheta}\right)}^{cosTheta}, c\right)}} \]
4. Add Preprocessing

5. Final simplification 98.7%

   \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{cosTheta \cdot \sqrt{\pi}}, {\left(e^{-cosTheta}\right)}^{cosTheta}, c\right)} \]
6. Add Preprocessing

Alternative 2: 98.1% accurate, 1.5× speedup

Math

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{\frac{1}{\sqrt{\frac{\pi}{1 - cosTheta \cdot 2}}}}{cosTheta} \cdot e^{cosTheta \cdot \left(-cosTheta\right)}} \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (/ (/ 1.0 (sqrt (/ PI (- 1.0 (* cosTheta 2.0))))) cosTheta)
    (exp (* cosTheta (- cosTheta)))))))

C

float code(float cosTheta, float c) {
	return 1.0f / ((1.0f + c) + (((1.0f / sqrtf((((float) M_PI) / (1.0f - (cosTheta * 2.0f))))) / cosTheta) * expf((cosTheta * -cosTheta))));
}

Julia

function code(cosTheta, c)
	return Float32(Float32(1.0) / Float32(Float32(Float32(1.0) + c) + Float32(Float32(Float32(Float32(1.0) / sqrt(Float32(Float32(pi) / Float32(Float32(1.0) - Float32(cosTheta * Float32(2.0)))))) / cosTheta) * exp(Float32(cosTheta * Float32(-cosTheta))))))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = single(1.0) / ((single(1.0) + c) + (((single(1.0) / sqrt((single(pi) / (single(1.0) - (cosTheta * single(2.0)))))) / cosTheta) * exp((cosTheta * -cosTheta))));
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Add Preprocessing
3. Step-by-step derivation

   1. *-un-lft-identity 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\left(1 \cdot \frac{1}{\sqrt{\pi}}\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. pow1/2 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot \frac{1}{\color{blue}{{\pi}^{0.5}}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   3. pow-flip 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot \color{blue}{{\pi}^{\left(-0.5\right)}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   4. metadata-eval 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot {\pi}^{\color{blue}{-0.5}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

4. Applied egg-rr 97.8%

   \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\left(1 \cdot {\pi}^{-0.5}\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
5. Step-by-step derivation

   1. *-lft-identity 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{{\pi}^{-0.5}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

6. Simplified 97.8%

   \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{{\pi}^{-0.5}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
7. Step-by-step derivation

   1. associate-*r/ 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\pi}^{-0.5} \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. associate--l- 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\pi}^{-0.5} \cdot \sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

8. Applied egg-rr 98.1%

   \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\pi}^{-0.5} \cdot \sqrt{1 - \left(cosTheta + cosTheta\right)}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
9. Step-by-step derivation

   1. *-commutative 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{1 - \left(cosTheta + cosTheta\right)} \cdot {\pi}^{-0.5}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. count-2 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - \color{blue}{2 \cdot cosTheta}} \cdot {\pi}^{-0.5}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   3. add-sqr-sqrt 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \color{blue}{\left(\sqrt{{\pi}^{-0.5}} \cdot \sqrt{{\pi}^{-0.5}}\right)}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   4. sqrt-unprod 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \color{blue}{\sqrt{{\pi}^{-0.5} \cdot {\pi}^{-0.5}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   5. pow-prod-up 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \sqrt{\color{blue}{{\pi}^{\left(-0.5 + -0.5\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   6. metadata-eval 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \sqrt{{\pi}^{\color{blue}{-1}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   7. inv-pow 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \sqrt{\color{blue}{\frac{1}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   8. sqrt-prod 98.2%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\left(1 - 2 \cdot cosTheta\right) \cdot \frac{1}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   9. div-inv 98.2%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{\frac{1 - 2 \cdot cosTheta}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   10. clear-num 98.2%

       \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{\frac{1}{\frac{\pi}{1 - 2 \cdot cosTheta}}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   11. sqrt-div 98.2%

       \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{1}}{\sqrt{\frac{\pi}{1 - 2 \cdot cosTheta}}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   12. metadata-eval 98.2%

       \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\color{blue}{1}}{\sqrt{\frac{\pi}{1 - 2 \cdot cosTheta}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   13. *-commutative 98.2%

       \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{1}{\sqrt{\frac{\pi}{1 - \color{blue}{cosTheta \cdot 2}}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

10. Applied egg-rr 98.2%

    \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{1}{\sqrt{\frac{\pi}{1 - cosTheta \cdot 2}}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

11. Final simplification 98.2%

    \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{1}{\sqrt{\frac{\pi}{1 - cosTheta \cdot 2}}}}{cosTheta} \cdot e^{cosTheta \cdot \left(-cosTheta\right)}} \]
12. Add Preprocessing

Alternative 3: 98.1% accurate, 1.5× speedup

Math

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + e^{cosTheta \cdot \left(-cosTheta\right)} \cdot \frac{\sqrt{\frac{1 - cosTheta \cdot 2}{\pi}}}{cosTheta}} \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (exp (* cosTheta (- cosTheta)))
    (/ (sqrt (/ (- 1.0 (* cosTheta 2.0)) PI)) cosTheta)))))

C

float code(float cosTheta, float c) {
	return 1.0f / ((1.0f + c) + (expf((cosTheta * -cosTheta)) * (sqrtf(((1.0f - (cosTheta * 2.0f)) / ((float) M_PI))) / cosTheta)));
}

Julia

function code(cosTheta, c)
	return Float32(Float32(1.0) / Float32(Float32(Float32(1.0) + c) + Float32(exp(Float32(cosTheta * Float32(-cosTheta))) * Float32(sqrt(Float32(Float32(Float32(1.0) - Float32(cosTheta * Float32(2.0))) / Float32(pi))) / cosTheta))))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = single(1.0) / ((single(1.0) + c) + (exp((cosTheta * -cosTheta)) * (sqrt(((single(1.0) - (cosTheta * single(2.0))) / single(pi))) / cosTheta)));
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Add Preprocessing
3. Step-by-step derivation

   1. *-un-lft-identity 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\left(1 \cdot \frac{1}{\sqrt{\pi}}\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. pow1/2 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot \frac{1}{\color{blue}{{\pi}^{0.5}}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   3. pow-flip 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot \color{blue}{{\pi}^{\left(-0.5\right)}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   4. metadata-eval 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot {\pi}^{\color{blue}{-0.5}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

4. Applied egg-rr 97.8%

   \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\left(1 \cdot {\pi}^{-0.5}\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
5. Step-by-step derivation

   1. *-lft-identity 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{{\pi}^{-0.5}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

6. Simplified 97.8%

   \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{{\pi}^{-0.5}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
7. Step-by-step derivation

   1. associate-*r/ 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\pi}^{-0.5} \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. associate--l- 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\pi}^{-0.5} \cdot \sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

8. Applied egg-rr 98.1%

   \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\pi}^{-0.5} \cdot \sqrt{1 - \left(cosTheta + cosTheta\right)}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
9. Step-by-step derivation

   1. *-commutative 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{1 - \left(cosTheta + cosTheta\right)} \cdot {\pi}^{-0.5}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. count-2 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - \color{blue}{2 \cdot cosTheta}} \cdot {\pi}^{-0.5}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   3. add-sqr-sqrt 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \color{blue}{\left(\sqrt{{\pi}^{-0.5}} \cdot \sqrt{{\pi}^{-0.5}}\right)}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   4. sqrt-unprod 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \color{blue}{\sqrt{{\pi}^{-0.5} \cdot {\pi}^{-0.5}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   5. pow-prod-up 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \sqrt{\color{blue}{{\pi}^{\left(-0.5 + -0.5\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   6. metadata-eval 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \sqrt{{\pi}^{\color{blue}{-1}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   7. inv-pow 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - 2 \cdot cosTheta} \cdot \sqrt{\color{blue}{\frac{1}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   8. sqrt-prod 98.2%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\left(1 - 2 \cdot cosTheta\right) \cdot \frac{1}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   9. div-inv 98.2%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{\frac{1 - 2 \cdot cosTheta}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   10. *-commutative 98.2%

       \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\frac{1 - \color{blue}{cosTheta \cdot 2}}{\pi}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

10. Applied egg-rr 98.2%

    \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\frac{1 - cosTheta \cdot 2}{\pi}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

11. Final simplification 98.2%

    \[\leadsto \frac{1}{\left(1 + c\right) + e^{cosTheta \cdot \left(-cosTheta\right)} \cdot \frac{\sqrt{\frac{1 - cosTheta \cdot 2}{\pi}}}{cosTheta}} \]
12. Add Preprocessing

Alternative 4: 95.9% accurate, 1.5× speedup

Math

\[\begin{array}{l} \\ cosTheta \cdot \left(\sqrt{\pi} + \pi \cdot \left(cosTheta \cdot \left(\sqrt{\frac{1}{\pi}} - \left(1 + c\right)\right)\right)\right) \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (*
  cosTheta
  (+ (sqrt PI) (* PI (* cosTheta (- (sqrt (/ 1.0 PI)) (+ 1.0 c)))))))

C

float code(float cosTheta, float c) {
	return cosTheta * (sqrtf(((float) M_PI)) + (((float) M_PI) * (cosTheta * (sqrtf((1.0f / ((float) M_PI))) - (1.0f + c)))));
}

Julia

function code(cosTheta, c)
	return Float32(cosTheta * Float32(sqrt(Float32(pi)) + Float32(Float32(pi) * Float32(cosTheta * Float32(sqrt(Float32(Float32(1.0) / Float32(pi))) - Float32(Float32(1.0) + c))))))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = cosTheta * (sqrt(single(pi)) + (single(pi) * (cosTheta * (sqrt((single(1.0) / single(pi))) - (single(1.0) + c)))));
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Step-by-step derivation

   1. associate-+l+ 97.8%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(c + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}\right)}} \]

   2. +-commutative 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\left(\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta} + c\right)}} \]

   3. fma-define 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\mathsf{fma}\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)}} \]

   4. times-frac 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\pi} \cdot cosTheta}}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   5. *-lft-identity 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   6. associate--l- 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   7. sub-neg 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 + \left(-\left(cosTheta + cosTheta\right)\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   8. neg-mul-1 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{-1 \cdot \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   9. distribute-lft-out 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{\left(-1 \cdot cosTheta + -1 \cdot cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   10. distribute-rgt-out 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{cosTheta \cdot \left(-1 + -1\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   11. metadata-eval 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot \color{blue}{-2}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   12. exp-prod 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, \color{blue}{{\left(e^{-cosTheta}\right)}^{cosTheta}}, c\right)} \]

3. Simplified 98.7%

   \[\leadsto \color{blue}{\frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, {\left(e^{-cosTheta}\right)}^{cosTheta}, c\right)}} \]
4. Add Preprocessing

5. Taylor expanded in cosTheta around 0 95.2%

   \[\leadsto \color{blue}{cosTheta \cdot \left(\sqrt{\pi} + -1 \cdot \left(cosTheta \cdot \left(\pi \cdot \left(1 + \left(c + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)\right)\right)} \]
6. Step-by-step derivation

   1. mul-1-neg 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} + \color{blue}{\left(-cosTheta \cdot \left(\pi \cdot \left(1 + \left(c + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)\right)}\right) \]

   2. unsub-neg 95.2%

      \[\leadsto cosTheta \cdot \color{blue}{\left(\sqrt{\pi} - cosTheta \cdot \left(\pi \cdot \left(1 + \left(c + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)\right)} \]

   3. associate-*r* 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \color{blue}{\left(cosTheta \cdot \pi\right) \cdot \left(1 + \left(c + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)}\right) \]

   4. *-commutative 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \color{blue}{\left(\pi \cdot cosTheta\right)} \cdot \left(1 + \left(c + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right) \]

   5. associate-*l* 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \color{blue}{\pi \cdot \left(cosTheta \cdot \left(1 + \left(c + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)}\right) \]

   6. associate-+r+ 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \pi \cdot \left(cosTheta \cdot \color{blue}{\left(\left(1 + c\right) + -1 \cdot \sqrt{\frac{1}{\pi}}\right)}\right)\right) \]

   7. mul-1-neg 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \pi \cdot \left(cosTheta \cdot \left(\left(1 + c\right) + \color{blue}{\left(-\sqrt{\frac{1}{\pi}}\right)}\right)\right)\right) \]

   8. unsub-neg 95.2%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \pi \cdot \left(cosTheta \cdot \color{blue}{\left(\left(1 + c\right) - \sqrt{\frac{1}{\pi}}\right)}\right)\right) \]

7. Simplified 95.2%

   \[\leadsto \color{blue}{cosTheta \cdot \left(\sqrt{\pi} - \pi \cdot \left(cosTheta \cdot \left(\left(1 + c\right) - \sqrt{\frac{1}{\pi}}\right)\right)\right)} \]

8. Final simplification 95.2%

   \[\leadsto cosTheta \cdot \left(\sqrt{\pi} + \pi \cdot \left(cosTheta \cdot \left(\sqrt{\frac{1}{\pi}} - \left(1 + c\right)\right)\right)\right) \]
9. Add Preprocessing

Alternative 5: 95.8% accurate, 1.5× speedup

Math

\[\begin{array}{l} \\ cosTheta \cdot \left(\sqrt{\pi} + \left(cosTheta \cdot \pi\right) \cdot \left(\sqrt{\frac{1}{\pi}} + -1\right)\right) \end{array} \]

FPCore

(FPCore (cosTheta c)
 :precision binary32
 (* cosTheta (+ (sqrt PI) (* (* cosTheta PI) (+ (sqrt (/ 1.0 PI)) -1.0)))))

C

float code(float cosTheta, float c) {
	return cosTheta * (sqrtf(((float) M_PI)) + ((cosTheta * ((float) M_PI)) * (sqrtf((1.0f / ((float) M_PI))) + -1.0f)));
}

Julia

function code(cosTheta, c)
	return Float32(cosTheta * Float32(sqrt(Float32(pi)) + Float32(Float32(cosTheta * Float32(pi)) * Float32(sqrt(Float32(Float32(1.0) / Float32(pi))) + Float32(-1.0)))))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = cosTheta * (sqrt(single(pi)) + ((cosTheta * single(pi)) * (sqrt((single(1.0) / single(pi))) + single(-1.0))));
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Add Preprocessing

3. Taylor expanded in c around 0 97.8%

   \[\leadsto \color{blue}{\frac{1}{1 + \frac{e^{-1 \cdot {cosTheta}^{2}}}{cosTheta} \cdot \sqrt{\frac{1 - 2 \cdot cosTheta}{\pi}}}} \]

4. Taylor expanded in cosTheta around 0 95.1%

   \[\leadsto \color{blue}{cosTheta \cdot \left(\sqrt{\pi} + -1 \cdot \left(cosTheta \cdot \left(\pi \cdot \left(1 + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)\right)} \]
5. Step-by-step derivation

   1. mul-1-neg 95.1%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} + \color{blue}{\left(-cosTheta \cdot \left(\pi \cdot \left(1 + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)}\right) \]

   2. unsub-neg 95.1%

      \[\leadsto cosTheta \cdot \color{blue}{\left(\sqrt{\pi} - cosTheta \cdot \left(\pi \cdot \left(1 + -1 \cdot \sqrt{\frac{1}{\pi}}\right)\right)\right)} \]

   3. associate-*r* 95.1%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \color{blue}{\left(cosTheta \cdot \pi\right) \cdot \left(1 + -1 \cdot \sqrt{\frac{1}{\pi}}\right)}\right) \]

   4. mul-1-neg 95.1%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \left(cosTheta \cdot \pi\right) \cdot \left(1 + \color{blue}{\left(-\sqrt{\frac{1}{\pi}}\right)}\right)\right) \]

   5. unsub-neg 95.1%

      \[\leadsto cosTheta \cdot \left(\sqrt{\pi} - \left(cosTheta \cdot \pi\right) \cdot \color{blue}{\left(1 - \sqrt{\frac{1}{\pi}}\right)}\right) \]

6. Simplified 95.1%

   \[\leadsto \color{blue}{cosTheta \cdot \left(\sqrt{\pi} - \left(cosTheta \cdot \pi\right) \cdot \left(1 - \sqrt{\frac{1}{\pi}}\right)\right)} \]

7. Final simplification 95.1%

   \[\leadsto cosTheta \cdot \left(\sqrt{\pi} + \left(cosTheta \cdot \pi\right) \cdot \left(\sqrt{\frac{1}{\pi}} + -1\right)\right) \]
8. Add Preprocessing

Alternative 6: 93.1% accurate, 3.1× speedup

Math

\[\begin{array}{l} \\ cosTheta \cdot \sqrt{\pi} \end{array} \]

FPCore

(FPCore (cosTheta c) :precision binary32 (* cosTheta (sqrt PI)))

C

float code(float cosTheta, float c) {
	return cosTheta * sqrtf(((float) M_PI));
}

Julia

function code(cosTheta, c)
	return Float32(cosTheta * sqrt(Float32(pi)))
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = cosTheta * sqrt(single(pi));
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Add Preprocessing
3. Step-by-step derivation

   1. *-un-lft-identity 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\left(1 \cdot \frac{1}{\sqrt{\pi}}\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. pow1/2 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot \frac{1}{\color{blue}{{\pi}^{0.5}}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   3. pow-flip 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot \color{blue}{{\pi}^{\left(-0.5\right)}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   4. metadata-eval 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\left(1 \cdot {\pi}^{\color{blue}{-0.5}}\right) \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

4. Applied egg-rr 97.8%

   \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\left(1 \cdot {\pi}^{-0.5}\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
5. Step-by-step derivation

   1. *-lft-identity 97.8%

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{{\pi}^{-0.5}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

6. Simplified 97.8%

   \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{{\pi}^{-0.5}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
7. Step-by-step derivation

   1. associate-*r/ 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\pi}^{-0.5} \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

   2. associate--l- 98.1%

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\pi}^{-0.5} \cdot \sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

8. Applied egg-rr 98.1%

   \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\pi}^{-0.5} \cdot \sqrt{1 - \left(cosTheta + cosTheta\right)}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]

9. Taylor expanded in cosTheta around 0 93.1%

   \[\leadsto \color{blue}{cosTheta \cdot \sqrt{\pi}} \]
10. Add Preprocessing

Alternative 7: 10.8% accurate, 107.3× speedup

Math

\[\begin{array}{l} \\ 1 - c \end{array} \]

FPCore

(FPCore (cosTheta c) :precision binary32 (- 1.0 c))

C

float code(float cosTheta, float c) {
	return 1.0f - c;
}

Fortran

real(4) function code(costheta, c)
    real(4), intent (in) :: costheta
    real(4), intent (in) :: c
    code = 1.0e0 - c
end function

Julia

function code(cosTheta, c)
	return Float32(Float32(1.0) - c)
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = single(1.0) - c;
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Step-by-step derivation

   1. associate-+l+ 97.8%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(c + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}\right)}} \]

   2. +-commutative 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\left(\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta} + c\right)}} \]

   3. fma-define 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\mathsf{fma}\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)}} \]

   4. times-frac 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\pi} \cdot cosTheta}}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   5. *-lft-identity 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   6. associate--l- 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   7. sub-neg 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 + \left(-\left(cosTheta + cosTheta\right)\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   8. neg-mul-1 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{-1 \cdot \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   9. distribute-lft-out 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{\left(-1 \cdot cosTheta + -1 \cdot cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   10. distribute-rgt-out 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{cosTheta \cdot \left(-1 + -1\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   11. metadata-eval 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot \color{blue}{-2}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   12. exp-prod 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, \color{blue}{{\left(e^{-cosTheta}\right)}^{cosTheta}}, c\right)} \]

3. Simplified 98.7%

   \[\leadsto \color{blue}{\frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, {\left(e^{-cosTheta}\right)}^{cosTheta}, c\right)}} \]
4. Add Preprocessing

5. Taylor expanded in c around inf 10.6%

   \[\leadsto \frac{1}{1 + \color{blue}{c}} \]

6. Taylor expanded in c around 0 10.6%

   \[\leadsto \color{blue}{1 + -1 \cdot c} \]
7. Step-by-step derivation

   1. mul-1-neg 10.6%

      \[\leadsto 1 + \color{blue}{\left(-c\right)} \]

   2. unsub-neg 10.6%

      \[\leadsto \color{blue}{1 - c} \]

8. Simplified 10.6%

   \[\leadsto \color{blue}{1 - c} \]
9. Add Preprocessing

Alternative 8: 10.8% accurate, 322.0× speedup

Math

\[\begin{array}{l} \\ 1 \end{array} \]

FPCore

(FPCore (cosTheta c) :precision binary32 1.0)

C

float code(float cosTheta, float c) {
	return 1.0f;
}

Fortran

real(4) function code(costheta, c)
    real(4), intent (in) :: costheta
    real(4), intent (in) :: c
    code = 1.0e0
end function

Julia

function code(cosTheta, c)
	return Float32(1.0)
end

MATLAB

function tmp = code(cosTheta, c)
	tmp = single(1.0);
end

Derivation

1. Initial program 97.8%

   \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
2. Step-by-step derivation

   1. associate-+l+ 97.8%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(c + \left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}\right)}} \]

   2. +-commutative 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\left(\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta} + c\right)}} \]

   3. fma-define 97.8%

      \[\leadsto \frac{1}{1 + \color{blue}{\mathsf{fma}\left(\frac{1}{\sqrt{\pi}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)}} \]

   4. times-frac 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\pi} \cdot cosTheta}}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   5. *-lft-identity 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   6. associate--l- 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   7. sub-neg 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{\color{blue}{1 + \left(-\left(cosTheta + cosTheta\right)\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   8. neg-mul-1 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{-1 \cdot \left(cosTheta + cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   9. distribute-lft-out 98.7%

      \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{\left(-1 \cdot cosTheta + -1 \cdot cosTheta\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   10. distribute-rgt-out 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + \color{blue}{cosTheta \cdot \left(-1 + -1\right)}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   11. metadata-eval 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot \color{blue}{-2}}}{\sqrt{\pi} \cdot cosTheta}, e^{\left(-cosTheta\right) \cdot cosTheta}, c\right)} \]

   12. exp-prod 98.7%

       \[\leadsto \frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, \color{blue}{{\left(e^{-cosTheta}\right)}^{cosTheta}}, c\right)} \]

3. Simplified 98.7%

   \[\leadsto \color{blue}{\frac{1}{1 + \mathsf{fma}\left(\frac{\sqrt{1 + cosTheta \cdot -2}}{\sqrt{\pi} \cdot cosTheta}, {\left(e^{-cosTheta}\right)}^{cosTheta}, c\right)}} \]
4. Add Preprocessing

5. Taylor expanded in c around inf 10.6%

   \[\leadsto \frac{1}{1 + \color{blue}{c}} \]

6. Taylor expanded in c around 0 10.6%

   \[\leadsto \color{blue}{1} \]
7. Add Preprocessing

Reproduce

herbie shell --seed 2024085 
(FPCore (cosTheta c)
  :name "Beckmann Sample, normalization factor"
  :precision binary32
  :pre (and (and (< 0.0 cosTheta) (< cosTheta 0.9999)) (and (< -1.0 c) (< c 1.0)))
  (/ 1.0 (+ (+ 1.0 c) (* (* (/ 1.0 (sqrt PI)) (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta)) (exp (* (- cosTheta) cosTheta))))))