Average Error: 0.1 → 0.1
Time: 9.0s
Precision: binary64
\[\left(0 < m \land 0 < v\right) \land v < 0.25\]
\[\left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right) \cdot \left(1 - m\right) \]
↓
\[\left(\frac{m}{\frac{v}{1 - m}} - 1\right) + m \cdot \left(1 - \frac{m \cdot \left(1 - m\right)}{v}\right) \]
\left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right) \cdot \left(1 - m\right)
↓
\left(\frac{m}{\frac{v}{1 - m}} - 1\right) + m \cdot \left(1 - \frac{m \cdot \left(1 - m\right)}{v}\right)

(FPCore (m v) :precision binary64 (* (- (/ (* m (- 1.0 m)) v) 1.0) (- 1.0 m)))
↓
(FPCore (m v)
 :precision binary64
 (+ (- (/ m (/ v (- 1.0 m))) 1.0) (* m (- 1.0 (/ (* m (- 1.0 m)) v)))))
double code(double m, double v) {
	return (((m * (1.0 - m)) / v) - 1.0) * (1.0 - m);
}
↓
double code(double m, double v) {
	return ((m / (v / (1.0 - m))) - 1.0) + (m * (1.0 - ((m * (1.0 - m)) / v)));
}

Error

Bits error versus m

Bits error versus v

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 0.1

    \[\left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right) \cdot \left(1 - m\right) \]

  2. Applied sub-neg_binary640.1

    \[\leadsto \left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right) \cdot \color{blue}{\left(1 + \left(-m\right)\right)} \]

  3. Applied distribute-rgt-in_binary640.1

    \[\leadsto \color{blue}{1 \cdot \left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right) + \left(-m\right) \cdot \left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right)} \]

  4. Applied associate-/l*_binary640.1

    \[\leadsto 1 \cdot \left(\color{blue}{\frac{m}{\frac{v}{1 - m}}} - 1\right) + \left(-m\right) \cdot \left(\frac{m \cdot \left(1 - m\right)}{v} - 1\right) \]

  5. Final simplification0.1

    \[\leadsto \left(\frac{m}{\frac{v}{1 - m}} - 1\right) + m \cdot \left(1 - \frac{m \cdot \left(1 - m\right)}{v}\right) \]

Reproduce

herbie shell --seed 2022019 
(FPCore (m v)
  :name "b parameter of renormalized beta distribution"
  :precision binary64
  :pre (and (and (< 0.0 m) (< 0.0 v)) (< v 0.25))
  (* (- (/ (* m (- 1.0 m)) v) 1.0) (- 1.0 m)))