Average Error: 0.5 → 0.5
Time: 10.1s
Precision: binary32
\[0 \leq cosTheta \land cosTheta \leq 1 \land 0.0001 \leq \alpha \land \alpha \leq 1\]
\[\frac{\alpha \cdot \alpha - 1}{\left(\pi \cdot \log \left(\alpha \cdot \alpha\right)\right) \cdot \left(1 + \left(\left(\alpha \cdot \alpha - 1\right) \cdot cosTheta\right) \cdot cosTheta\right)} \]
\[\frac{1}{\pi \cdot \log \left(\alpha \cdot \alpha\right)} \cdot \frac{\alpha \cdot \alpha - 1}{1 + cosTheta \cdot \left(\left(\alpha \cdot \alpha\right) \cdot cosTheta - cosTheta\right)} \]
\frac{\alpha \cdot \alpha - 1}{\left(\pi \cdot \log \left(\alpha \cdot \alpha\right)\right) \cdot \left(1 + \left(\left(\alpha \cdot \alpha - 1\right) \cdot cosTheta\right) \cdot cosTheta\right)}
\frac{1}{\pi \cdot \log \left(\alpha \cdot \alpha\right)} \cdot \frac{\alpha \cdot \alpha - 1}{1 + cosTheta \cdot \left(\left(\alpha \cdot \alpha\right) \cdot cosTheta - cosTheta\right)}
(FPCore (cosTheta alpha)
 :precision binary32
 (/
  (- (* alpha alpha) 1.0)
  (*
   (* PI (log (* alpha alpha)))
   (+ 1.0 (* (* (- (* alpha alpha) 1.0) cosTheta) cosTheta)))))
(FPCore (cosTheta alpha)
 :precision binary32
 (*
  (/ 1.0 (* PI (log (* alpha alpha))))
  (/
   (- (* alpha alpha) 1.0)
   (+ 1.0 (* cosTheta (- (* (* alpha alpha) cosTheta) cosTheta))))))
float code(float cosTheta, float alpha) {
	return ((alpha * alpha) - 1.0f) / ((((float) M_PI) * logf(alpha * alpha)) * (1.0f + ((((alpha * alpha) - 1.0f) * cosTheta) * cosTheta)));
}
float code(float cosTheta, float alpha) {
	return (1.0f / (((float) M_PI) * logf(alpha * alpha))) * (((alpha * alpha) - 1.0f) / (1.0f + (cosTheta * (((alpha * alpha) * cosTheta) - cosTheta))));
}

Error

Bits error versus cosTheta

Bits error versus alpha

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 0.5

    \[\frac{\alpha \cdot \alpha - 1}{\left(\pi \cdot \log \left(\alpha \cdot \alpha\right)\right) \cdot \left(1 + \left(\left(\alpha \cdot \alpha - 1\right) \cdot cosTheta\right) \cdot cosTheta\right)} \]
  2. Taylor expanded around 0 0.5

    \[\leadsto \frac{\alpha \cdot \alpha - 1}{\left(\pi \cdot \log \left(\alpha \cdot \alpha\right)\right) \cdot \left(1 + \color{blue}{\left({\alpha}^{2} \cdot cosTheta - cosTheta\right)} \cdot cosTheta\right)} \]
  3. Simplified0.5

    \[\leadsto \frac{\alpha \cdot \alpha - 1}{\left(\pi \cdot \log \left(\alpha \cdot \alpha\right)\right) \cdot \left(1 + \color{blue}{\left(cosTheta \cdot \left(\alpha \cdot \alpha\right) - cosTheta\right)} \cdot cosTheta\right)} \]
  4. Using strategy rm
  5. Applied *-un-lft-identity_binary320.5

    \[\leadsto \frac{\color{blue}{1 \cdot \left(\alpha \cdot \alpha - 1\right)}}{\left(\pi \cdot \log \left(\alpha \cdot \alpha\right)\right) \cdot \left(1 + \left(cosTheta \cdot \left(\alpha \cdot \alpha\right) - cosTheta\right) \cdot cosTheta\right)} \]
  6. Applied times-frac_binary320.5

    \[\leadsto \color{blue}{\frac{1}{\pi \cdot \log \left(\alpha \cdot \alpha\right)} \cdot \frac{\alpha \cdot \alpha - 1}{1 + \left(cosTheta \cdot \left(\alpha \cdot \alpha\right) - cosTheta\right) \cdot cosTheta}} \]
  7. Final simplification0.5

    \[\leadsto \frac{1}{\pi \cdot \log \left(\alpha \cdot \alpha\right)} \cdot \frac{\alpha \cdot \alpha - 1}{1 + cosTheta \cdot \left(\left(\alpha \cdot \alpha\right) \cdot cosTheta - cosTheta\right)} \]

Reproduce

herbie shell --seed 2021202 
(FPCore (cosTheta alpha)
  :name "GTR1 distribution"
  :precision binary32
  :pre (and (<= 0.0 cosTheta 1.0) (<= 0.0001 alpha 1.0))
  (/ (- (* alpha alpha) 1.0) (* (* PI (log (* alpha alpha))) (+ 1.0 (* (* (- (* alpha alpha) 1.0) cosTheta) cosTheta)))))