quadm (p42, negative)

Average Error: 34.1 → 6.8

Time: 6.7s

Precision: binary64

Math

\[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]

↓

\[\begin{array}{l} \mathbf{if}\;b \leq -5.566759220787537 \cdot 10^{+83}:\\ \;\;\;\;-\frac{c}{b}\\ \mathbf{elif}\;b \leq 8.005947987748499 \cdot 10^{-240}:\\ \;\;\;\;2 \cdot \frac{c}{\sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} - b}\\ \mathbf{elif}\;b \leq 6.914177626537424 \cdot 10^{+129}:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{-b}{a}\\ \end{array}\]

FPCore

(FPCore (a b c)
 :precision binary64
 (/ (- (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))

↓

(FPCore (a b c)
 :precision binary64
 (if (<= b -5.566759220787537e+83)
   (- (/ c b))
   (if (<= b 8.005947987748499e-240)
     (* 2.0 (/ c (- (sqrt (- (* b b) (* 4.0 (* c a)))) b)))
     (if (<= b 6.914177626537424e+129)
       (/ (- (- b) (sqrt (- (* b b) (* 4.0 (* c a))))) (* 2.0 a))
       (/ (- b) a)))))

C

double code(double a, double b, double c) {
	return (-b - sqrt((b * b) - (4.0 * (a * c)))) / (2.0 * a);
}

↓

double code(double a, double b, double c) {
	double tmp;
	if (b <= -5.566759220787537e+83) {
		tmp = -(c / b);
	} else if (b <= 8.005947987748499e-240) {
		tmp = 2.0 * (c / (sqrt((b * b) - (4.0 * (c * a))) - b));
	} else if (b <= 6.914177626537424e+129) {
		tmp = (-b - sqrt((b * b) - (4.0 * (c * a)))) / (2.0 * a);
	} else {
		tmp = -b / a;
	}
	return tmp;
}

Error

Bits error versus a

Bits error versus b

Bits error versus c

Target

Original	34.1
Target	21.0
Herbie	6.8

\[\begin{array}{l} \mathbf{if}\;b < 0:\\ \;\;\;\;\frac{c}{a \cdot \frac{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \end{array}\]

Derivation

1. Split input into 4 regimes

2. if b < -5.5667592207875366e83

   1. Initial program 59.0

      \[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]

   2. Taylor expanded around -inf 2.6

      \[\leadsto \color{blue}{-1 \cdot \frac{c}{b}}\]

   3. Simplified 2.6

      \[\leadsto \color{blue}{-\frac{c}{b}}\]

   if -5.5667592207875366e83 < b < 8.00594798774849923e-240

   1. Initial program 30.0

      \[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]
   2. Using strategy rm

   3. Applied flip--_binary64 30.1

      \[\leadsto \frac{\color{blue}{\frac{\left(-b\right) \cdot \left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} \cdot \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}}{2 \cdot a}\]

   4. Simplified 16.9

      \[\leadsto \frac{\frac{\color{blue}{4 \cdot \left(a \cdot c\right)}}{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\]

   5. Simplified 16.9

      \[\leadsto \frac{\frac{4 \cdot \left(a \cdot c\right)}{\color{blue}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}}}{2 \cdot a}\]
   6. Using strategy rm

   7. Applied *-un-lft-identity_binary64 16.9

      \[\leadsto \frac{\frac{4 \cdot \left(a \cdot c\right)}{\color{blue}{1 \cdot \left(\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b\right)}}}{2 \cdot a}\]

   8. Applied times-frac_binary64 16.9

      \[\leadsto \frac{\color{blue}{\frac{4}{1} \cdot \frac{a \cdot c}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}}}{2 \cdot a}\]

   9. Applied times-frac_binary64 16.9

      \[\leadsto \color{blue}{\frac{\frac{4}{1}}{2} \cdot \frac{\frac{a \cdot c}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}}{a}}\]

   10. Simplified 16.9

       \[\leadsto \color{blue}{2} \cdot \frac{\frac{a \cdot c}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}}{a}\]

   11. Simplified 10.2

       \[\leadsto 2 \cdot \color{blue}{\left(1 \cdot \frac{c}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}\right)}\]

   if 8.00594798774849923e-240 < b < 6.9141776265374237e129

   1. Initial program 8.1

      \[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]

   if 6.9141776265374237e129 < b

   1. Initial program 54.7

      \[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]
   2. Using strategy rm

   3. Applied flip--_binary64 63.7

      \[\leadsto \frac{\color{blue}{\frac{\left(-b\right) \cdot \left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} \cdot \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}}{2 \cdot a}\]

   4. Simplified 62.6

      \[\leadsto \frac{\frac{\color{blue}{4 \cdot \left(a \cdot c\right)}}{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\]

   5. Simplified 62.6

      \[\leadsto \frac{\frac{4 \cdot \left(a \cdot c\right)}{\color{blue}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}}}{2 \cdot a}\]

   6. Taylor expanded around 0 3.0

      \[\leadsto \color{blue}{-1 \cdot \frac{b}{a}}\]

   7. Simplified 3.0

      \[\leadsto \color{blue}{\frac{-b}{a}}\]
3. Recombined 4 regimes into one program.

4. Final simplification 6.8

   \[\leadsto \begin{array}{l} \mathbf{if}\;b \leq -5.566759220787537 \cdot 10^{+83}:\\ \;\;\;\;-\frac{c}{b}\\ \mathbf{elif}\;b \leq 8.005947987748499 \cdot 10^{-240}:\\ \;\;\;\;2 \cdot \frac{c}{\sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)} - b}\\ \mathbf{elif}\;b \leq 6.914177626537424 \cdot 10^{+129}:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(c \cdot a\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{-b}{a}\\ \end{array}\]

Reproduce

herbie shell --seed 2020273 
(FPCore (a b c)
  :name "quadm (p42, negative)"
  :precision binary64
  :herbie-expected #f

  :herbie-target
  (if (< b 0.0) (/ c (* a (/ (+ (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))) (/ (- (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))

  (/ (- (- b) (sqrt (- (* b b) (* 4.0 (* a c))))) (* 2.0 a)))