











if b < -1.4516784f-11if -1.4516784f-11 < b < 2.163724f+14rm rm if 2.163724f+14 < b Original test:
(lambda ((a default) (b default) (c default))
#:name "The quadratic formula (r2)"
(/ (- (- b) (sqrt (- (sqr b) (* 4 (* a c))))) (* 2 a))
#:target
(if (< b 0) (/ c (* a (/ (+ (- b) (sqrt (- (sqr b) (* 4 (* a c))))) (* 2 a)))) (/ (- (- b) (sqrt (- (sqr b) (* 4 (* a c))))) (* 2 a))))