Metrics for 1/2(abs(p)+abs(r) + sqrt((p-r)^2 + 4q^2))

start0.0ms (0%)

Memory: 0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

analyze0.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated; 0ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.9%	0.1%	0%	0%	0%	0
100%	99.9%	0%	0.1%	0%	0%	0%	1

Compiler

Compiled 24 to 20 computations (16.7% saved)

sample2.0s (34.9%)

Memory

24.5MiB live, 1 609.4MiB allocated; 2.5s collecting garbage

Samples

1.7s

8 256×

valid

Precisions

Click to see histograms. Total time spent on operations: 493.0ms

ival-pow2: 163.0ms (33.1% of total)

ival-fabs: 103.0ms (20.9% of total)

ival-mult!: 75.0ms (15.2% of total)

ival-add!: 64.0ms (13% of total)

ival-sqrt: 62.0ms (12.6% of total)

ival-sub!: 25.0ms (5.1% of total)

adjust: 2.0ms (0.4% of total)

Bogosity

preprocess30.0ms (0.5%)

Memory

35.1MiB live, 35.1MiB allocated; 0ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	73	205
1	559	184

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	52.2%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))

Status

Accuracy

Program

▶

52.2%

(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))

Symmetry

(abs q)

Compiler

Compiled 44 to 36 computations (18.2% saved)

series281.0ms (4.8%)

Memory

-11.9MiB live, 210.8MiB allocated; 45ms collecting garbage

Counts

18 → 136

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
p
(fabs.f64 r)
r
(sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))
(+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))
(pow.f64 (-.f64 p r) #s(literal 2 binary64))
(-.f64 p r)
(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))
#s(literal 4 binary64)
(pow.f64 q #s(literal 2 binary64))
q

Outputs
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))))
#s(approx (+ (fabs p) (fabs r)) (+.f64 (fabs.f64 p) (fabs.f64 r)))
#s(approx (fabs p) (fabs.f64 p))
#s(approx p p)
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64)))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 r #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (- p r) (*.f64 #s(literal -1 binary64) r))
#s(approx (- p r) (-.f64 p r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (+.f64 (/.f64 (*.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 r p)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (pow.f64 p #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 r p)))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (pow.f64 q #s(literal 2 binary64))) p) (*.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 #s(literal -1 binary64) p))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p))))) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p))))) p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 r p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p))) p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p))) p))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (- p r) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (/.f64 r p) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))))
#s(approx (fabs r) (fabs.f64 r))
#s(approx r r)
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 p #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (- p r) (+.f64 p (*.f64 #s(literal -1 binary64) r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (+.f64 (/.f64 (*.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 p r)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 p r)))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (- p r) (*.f64 r (-.f64 (/.f64 p r) #s(literal 1 binary64))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (pow.f64 q #s(literal 2 binary64))) r) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r))))) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r))))) r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 p r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r))) r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r))) r))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (* 4 (pow q 2)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))
#s(approx (pow q 2) (pow.f64 q #s(literal 2 binary64)))
#s(approx q q)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 q (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fabs.f64 p) q) (/.f64 (fabs.f64 r) q)))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) q) (/.f64 (fabs.f64 r) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) q) (/.f64 (fabs.f64 r) q)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* 4 (pow q 2))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (*.f64 #s(literal -2 binary64) q))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q)))) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q)))) q))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))))

Calls

9 calls:

Time	Variable	Point
5.0ms	p	0
3.0ms	p	inf
3.0ms	q	0
2.0ms	p	-inf
2.0ms	r	inf

rewrite237.0ms (4%)

Memory

30.8MiB live, 161.8MiB allocated; 31ms collecting garbage

Counts

18 → 87

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
p
(fabs.f64 r)
r
(sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))
(+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))
(pow.f64 (-.f64 p r) #s(literal 2 binary64))
(-.f64 p r)
(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))
#s(literal 4 binary64)
(pow.f64 q #s(literal 2 binary64))
q

Outputs
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 (-.f64 p r) p r))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(*.f64 (fabs.f64 #s(literal 1 binary64)) (fabs.f64 #s(literal 1 binary64)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(*.f64 (fabs.f64 #s(literal 1 binary64)) (fabs.f64 #s(literal 1 binary64)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(*.f64 (fabs.f64 #s(literal 1 binary64)) (fabs.f64 #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 (-.f64 p r) p r))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (-.f64 p r))
(*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1 binary64) p) (-.f64 p r))
p
(*.f64 p #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) p)
(*.f64 p p)
(fabs.f64 p)
p
(*.f64 p #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) p)
(*.f64 p p)
(fabs.f64 p)
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 (-.f64 p r) p r))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 (-.f64 p r) p r))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (-.f64 p r))
(*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1 binary64) p) (-.f64 p r))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (fma.f64 (-.f64 p r) p r) (-.f64 p r))
(*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1 binary64) p) (-.f64 p r))
(*.f64 #s(literal 4 binary64) q)
(*.f64 q #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(.f64 q (.f64 #s(literal 4 binary64) q))
(.f64 (neg.f64 (.f64 #s(literal 4 binary64) q)) (neg.f64 q))
#s(literal 4 binary64)
(neg.f64 (neg.f64 #s(literal 4 binary64)))
q
(*.f64 q q)
(*.f64 (neg.f64 q) (neg.f64 q))
(*.f64 (pow.f64 (neg.f64 q) #s(literal 3 binary64)) (pow.f64 (neg.f64 q) #s(literal 3 binary64)))
(*.f64 (pow.f64 q (/.f64 #s(literal 3 binary64) #s(literal 1 binary64))) (pow.f64 q (/.f64 #s(literal 3 binary64) #s(literal 1 binary64))))
q
(*.f64 q q)
(*.f64 (neg.f64 q) (neg.f64 q))
(*.f64 (pow.f64 (neg.f64 q) #s(literal 3 binary64)) (pow.f64 (neg.f64 q) #s(literal 3 binary64)))
(*.f64 (pow.f64 q (/.f64 #s(literal 3 binary64) #s(literal 1 binary64))) (pow.f64 q (/.f64 #s(literal 3 binary64) #s(literal 1 binary64))))

eval23.0ms (0.4%)

Memory: -7.3MiB live, 35.0MiB allocated; 4ms collecting garbage
Compiler: Compiled 7 203 to 1 057 computations (85.3% saved)

prune15.0ms (0.3%)

Memory

22.4MiB live, 22.4MiB allocated; 0ms collecting garbage

Pruning

16 alts after pruning (16 fresh and 0 done)

	Pruned	Kept	Total
New	155	16	171
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	156	16	172

Accuracy

99.7%

Counts

172 → 16

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.6%	(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
▶	52.2%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
	32.0%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( 4 (pow q 2))) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
	32.8%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( 4 (pow q 2))) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
	32.4%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
▶	30.7%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
	40.4%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
	33.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
▶	5.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
	5.6%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
	5.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
	5.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
	31.8%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
▶	10.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
	30.2%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
▶	1.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))

Compiler

Compiled 1 036 to 794 computations (23.4% saved)

series459.0ms (7.8%)

Memory

-32.9MiB live, 246.1MiB allocated; 237ms collecting garbage

Counts

39 → 180

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
p
(fabs.f64 r)
r
(sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q)))
(+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))
(pow.f64 (-.f64 p r) #s(literal 2 binary64))
(-.f64 p r)
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 #s(literal 4 binary64) q)
#s(literal 4 binary64)
q
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
(*.f64 #s(literal -1 binary64) q)
#s(literal -1 binary64)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
(*.f64 #s(literal 1/2 binary64) r)
#s(literal 1/2 binary64)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
(.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
(.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))
#s(literal -1/2 binary64)
(/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
(.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)))
(.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r))
(/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)
(+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p)))
(+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))
(*.f64 #s(literal -1 binary64) p)

Outputs
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))))
#s(approx (+ (fabs p) (fabs r)) (+.f64 (fabs.f64 p) (fabs.f64 r)))
#s(approx (fabs p) (fabs.f64 p))
#s(approx p p)
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64)))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 r #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (- p r) (*.f64 #s(literal -1 binary64) r))
#s(approx (- p r) (-.f64 p r))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q)))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))
#s(approx (* -1/2 (/ (+ (fabs p) (fabs r)) q)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))
#s(approx (/ (+ (fabs p) (fabs r)) q) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal -1/2 binary64) p (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 p r) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))
#s(approx (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)) (fma.f64 #s(literal -1/2 binary64) (/.f64 p r) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))
#s(approx (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))
#s(approx (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))
#s(approx (+ (fabs p) (+ (fabs r) (* -1 p))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))))
#s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))
#s(approx (+ (fabs r) (* -1 p)) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p)))
#s(approx (* -1 p) (*.f64 #s(literal -1 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (+.f64 (/.f64 (*.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 r p)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (pow.f64 p #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 r p)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 p (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p) #s(literal 1/2 binary64))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (.f64 p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) p))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)) (.f64 p (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r) (*.f64 #s(literal -1 binary64) (/.f64 p r)))
#s(approx (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r) (.f64 p (-.f64 (+.f64 (/.f64 (fabs.f64 p) (.f64 p r)) (/.f64 (fabs.f64 r) (*.f64 p r))) (/.f64 #s(literal 1 binary64) r))))
#s(approx (+ (fabs p) (+ (fabs r) (* -1 p))) (*.f64 p (-.f64 (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p)) #s(literal 1 binary64))))
#s(approx (+ (fabs r) (* -1 p)) (*.f64 p (-.f64 (/.f64 (fabs.f64 r) p) #s(literal 1 binary64))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (pow.f64 q #s(literal 2 binary64))) p) (*.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p))))) p))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p))))) p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 r p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p))) p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p))) p))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (- p r) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (/.f64 r p) #s(literal 1 binary64)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)))) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (+ (fabs p) (+ (fabs r) (* -1 p))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) p))))))
#s(approx (+ (fabs r) (* -1 p)) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fabs.f64 r) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))))
#s(approx r r)
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 p #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (- p r) (+.f64 p (*.f64 #s(literal -1 binary64) r)))
#s(approx (* 1/2 r) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))) r))
#s(approx (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (+.f64 (/.f64 (*.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 p r)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 p r)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (- p r) (*.f64 r (-.f64 (/.f64 p r) #s(literal 1 binary64))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (pow.f64 q #s(literal 2 binary64))) r) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r))))) r))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r))))) r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 p r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r))) r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r))) r))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (* (* 4 q) q) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))
#s(approx (* 4 q) (*.f64 #s(literal 4 binary64) q))
#s(approx q q)
#s(approx (* -1 q) (*.f64 #s(literal -1 binary64) q))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))
#s(approx (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q)))) (+.f64 q (*.f64 #s(literal -1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))) (/.f64 (+.f64 q (*.f64 #s(literal -1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 #s(literal 2 binary64) q))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fabs.f64 p) q) (/.f64 (fabs.f64 r) q)))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) q) (/.f64 (fabs.f64 r) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (+.f64 (/.f64 (fabs.f64 p) q) (/.f64 (fabs.f64 r) q)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 q #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64))))
#s(approx (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 #s(literal -2 binary64) q))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q)))) q))))))
#s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q)))) q))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))))
#s(approx (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q)))) (.f64 #s(literal -1 binary64) (.f64 q (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))

Calls

9 calls:

Time	Variable	Point
12.0ms	p	0
6.0ms	p	-inf
4.0ms	r	-inf
3.0ms	r	inf
3.0ms	p	inf

rewrite330.0ms (5.6%)

Memory

32.5MiB live, 246.7MiB allocated; 26ms collecting garbage

Counts

39 → 167

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
p
(fabs.f64 r)
r
(sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q)))
(+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))
(pow.f64 (-.f64 p r) #s(literal 2 binary64))
(-.f64 p r)
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 #s(literal 4 binary64) q)
#s(literal 4 binary64)
q
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
(*.f64 #s(literal -1 binary64) q)
#s(literal -1 binary64)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
(*.f64 #s(literal 1/2 binary64) r)
#s(literal 1/2 binary64)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
(.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
(.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))
#s(literal -1/2 binary64)
(/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
(.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)))
(.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r))
(/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)
(+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p)))
(+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))
(*.f64 #s(literal -1 binary64) p)

Outputs
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 #s(literal 1 binary64) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 #s(literal 1 binary64) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 #s(literal 1 binary64) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 (neg.f64 r) p))
(fabs.f64 (-.f64 p r))
p
(*.f64 #s(literal -1 binary64) p)
(*.f64 p #s(literal -1 binary64))
(*.f64 p #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) p)
p
(*.f64 #s(literal -1 binary64) p)
(*.f64 p #s(literal -1 binary64))
(*.f64 p #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) p)
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) (-.f64 p r))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) (fma.f64 q #s(literal 4 binary64) (-.f64 p r)))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 (neg.f64 r) p))
(fabs.f64 (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 (neg.f64 r) p))
(fabs.f64 (-.f64 p r))
(*.f64 #s(literal 4 binary64) q)
(*.f64 q #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(.f64 (.f64 #s(literal 4 binary64) q) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) q)
(*.f64 q #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(.f64 (.f64 #s(literal 4 binary64) q) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) #s(literal -1 binary64))
#s(literal 4 binary64)
(neg.f64 (neg.f64 #s(literal 4 binary64)))
q
(*.f64 #s(literal -1 binary64) q)
(*.f64 q #s(literal -1 binary64))
(*.f64 q #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) q)
#s(approx (- (* q 4) (+ p r)) q)
q
(*.f64 #s(literal -1 binary64) q)
(*.f64 q #s(literal -1 binary64))
(*.f64 q #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) q)
#s(literal -1 binary64)
(neg.f64 (neg.f64 #s(literal -1 binary64)))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal 1/2 binary64) r))
(*.f64 #s(literal 1/2 binary64) r)
(*.f64 r #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(neg.f64 (neg.f64 #s(literal 1/2 binary64)))
#s(approx (- (* q 4) (+ p r)) (.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q))
(.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q)
(.f64 q (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)))
(.f64 #s(literal -1 binary64) (.f64 (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q))
(.f64 (.f64 (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q) #s(literal -1 binary64))
(.f64 (.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q) (.f64 (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q))
(.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q)
(.f64 q (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)))
(.f64 #s(literal -1 binary64) (.f64 (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q))
(.f64 (.f64 (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q) #s(literal -1 binary64))
(.f64 (.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q) (.f64 (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) q))
(.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) (fma.f64 (*.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)))
(.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r) #s(literal 1 binary64)))
(.f64 (.f64 q #s(literal -1/2 binary64)) (-.f64 p r))
(.f64 (-.f64 p r) (.f64 q #s(literal -1/2 binary64)))
(*.f64 (-.f64 p r) (/.f64 #s(literal -1/2 binary64) q))
(*.f64 (/.f64 #s(literal -1/2 binary64) q) (-.f64 p r))
(*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 p r) q))
#s(literal -1/2 binary64)
(*.f64 #s(literal 1 binary64) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))
(/.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))
(neg.f64 (neg.f64 #s(literal -1/2 binary64)))
(*.f64 (/.f64 (-.f64 p r) q) (/.f64 (-.f64 p r) q))
(*.f64 (/.f64 (-.f64 p r) q) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 p r) q))
(*.f64 (-.f64 p r) (/.f64 (-.f64 p r) q))
(*.f64 (fabs.f64 (/.f64 (-.f64 p r) q)) (fabs.f64 (/.f64 (-.f64 p r) q)))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 p r) r r)))
(*.f64 r (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (fma.f64 (-.f64 p r) r #s(literal 1 binary64)) (.f64 #s(literal 1/2 binary64) r))
(*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r)
(.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 p r) r r)))
(.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 p r) r r)) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (-.f64 p r) r #s(literal 1 binary64)) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (-.f64 p r) r #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (fma.f64 (-.f64 p r) r #s(literal 1 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) r) (fma.f64 r p r))
(.f64 (.f64 #s(literal 1/2 binary64) r) (-.f64 p r))
(*.f64 (-.f64 p r) (/.f64 #s(literal 1/2 binary64) r))
(.f64 (-.f64 p r) (.f64 #s(literal 1/2 binary64) r))
(*.f64 (fma.f64 r p r) (neg.f64 #s(literal 1/2 binary64)))
(*.f64 (-.f64 p r) (fma.f64 r p r))
(*.f64 (-.f64 p r) r)
(*.f64 (fma.f64 r p r) r)
(*.f64 (fma.f64 r p r) (fma.f64 r p r))
(*.f64 (fma.f64 r p r) (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 (neg.f64 r) p))
(fabs.f64 (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 p r))
(*.f64 (-.f64 p r) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 p r))
(*.f64 (-.f64 p r) (-.f64 (neg.f64 r) p))
(fabs.f64 (-.f64 p r))
p
(*.f64 #s(literal -1 binary64) p)
(*.f64 p #s(literal -1 binary64))
(*.f64 p #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) p)

eval41.0ms (0.7%)

Memory: 18.5MiB live, 61.4MiB allocated; 5ms collecting garbage
Compiler: Compiled 13 155 to 1 790 computations (86.4% saved)

prune31.0ms (0.5%)

Memory

-13.0MiB live, 35.7MiB allocated; 12ms collecting garbage

Pruning

23 alts after pruning (21 fresh and 2 done)

	Pruned	Kept	Total
New	291	19	310
Fresh	9	2	11
Picked	3	2	5
Done	0	0	0
Total	303	23	326

Accuracy

99.7%

Counts

326 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.6%	(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
	42.5%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
	32.0%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
	32.8%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
▶	51.8%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
▶	32.4%	#s(approx (- (* q 4) (+ p r)) q)
	40.4%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
	33.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
	5.6%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
	5.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
▶	31.8%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
	4.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
	24.4%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
▶	4.8%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
▶	4.6%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
✓	5.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
	5.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
✓	1.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
	36.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
	24.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
	13.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
	10.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
	14.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))

Compiler

Compiled 1 582 to 1 156 computations (26.9% saved)

series493.0ms (8.4%)

Memory

45.5MiB live, 394.7MiB allocated; 92ms collecting garbage

Counts

40 → 270

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))))
(fabs.f64 (-.f64 p r))
(-.f64 p r)
p
r
(sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q)))
(+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))
(pow.f64 (-.f64 p r) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 #s(literal 4 binary64) q)
#s(literal 4 binary64)
q
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))
(*.f64 #s(literal -1/2 binary64) (/.f64 p r))
#s(literal -1/2 binary64)
(/.f64 p r)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 r p r)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
(.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)))))
#s(literal -1 binary64)
(.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))
(/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)
(+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
(fabs.f64 r)

Outputs
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))))
#s(approx (fabs (- p r)) (fabs.f64 (-.f64 p r)))
#s(approx (- p r) (*.f64 #s(literal -1 binary64) r))
#s(approx (- p r) (-.f64 p r))
#s(approx p p)
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64)))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 r #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (- (* q 4) (+ p r)) (-.f64 (fma.f64 #s(literal -1 binary64) p (*.f64 #s(literal 4 binary64) q)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal -1/2 binary64) p (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 p r) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* -1/2 (/ p r)) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))
#s(approx (/ p r) (/.f64 p r))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 #s(literal 1/2 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) r)))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (fma.f64 #s(literal 1/4 binary64) (.f64 p (pow.f64 r #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) r))))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) r))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (fma.f64 #s(literal 1/4 binary64) (.f64 p r) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) r)))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) r)))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (.f64 p r)))))
#s(approx (+ (* r p) r) r)
#s(approx (+ (* r p) r) (+.f64 r (*.f64 p r)))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))) (*.f64 #s(literal 1/2 binary64) p)))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (fma.f64 #s(literal -1/2 binary64) p (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 p r) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))
#s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (fma.f64 #s(literal -1/2 binary64) (/.f64 p r) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))
#s(approx (/ (+ p (+ (fabs p) (fabs r))) r) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))
#s(approx (/ (+ p (+ (fabs p) (fabs r))) r) (+.f64 (/.f64 p r) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))
#s(approx (+ p (+ (fabs p) (fabs r))) (+.f64 (fabs.f64 p) (fabs.f64 r)))
#s(approx (+ p (+ (fabs p) (fabs r))) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))
#s(approx (fabs p) (fabs.f64 p))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (*.f64 #s(literal -1 binary64) r)) p)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) r)) p) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) r)) p) (+.f64 (/.f64 (*.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (/.f64 (fabs.f64 (-.f64 p r)) p)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) p)))))))
#s(approx (- p r) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 r p)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (pow.f64 p #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 r p)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (.f64 p (-.f64 (.f64 #s(literal 4 binary64) (/.f64 q p)) (+.f64 #s(literal 1 binary64) (/.f64 r p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (+.f64 (/.f64 (*.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 p (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p) #s(literal 1/2 binary64))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (.f64 p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) p))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 #s(literal 1/4 binary64) (.f64 p (pow.f64 r #s(literal 2 binary64)))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (pow.f64 r #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) r))) p)))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 #s(literal 1/4 binary64) (.f64 p r)))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 p (fma.f64 #s(literal 1/4 binary64) r (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) r)) p)))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 p r)))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 p (fma.f64 #s(literal 1/2 binary64) r (fma.f64 #s(literal 1/2 binary64) (/.f64 r p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) p))))))
#s(approx (+ (* r p) r) (*.f64 p r))
#s(approx (+ (* r p) r) (*.f64 p (+.f64 r (/.f64 r p))))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p)))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (.f64 p (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p) #s(literal 1/2 binary64))))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (.f64 p (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) p))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (/ (+ p (+ (fabs p) (fabs r))) r) (.f64 p (+.f64 (/.f64 #s(literal 1 binary64) r) (+.f64 (/.f64 (fabs.f64 p) (.f64 p r)) (/.f64 (fabs.f64 r) (*.f64 p r))))))
#s(approx (+ p (+ (fabs p) (fabs r))) (*.f64 p (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p))))) p))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (*.f64 #s(literal -1 binary64) p))))))) p))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (pow.f64 q #s(literal 2 binary64))) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p))))))) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p))))) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p)))) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (*.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p)))) p))))))
#s(approx (fabs (- p r)) (fabs.f64 (neg.f64 (+.f64 r (*.f64 #s(literal -1 binary64) p)))))
#s(approx (- p r) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (/.f64 r p) #s(literal 1 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 r p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p))) p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p))) p))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (- (* q 4) (+ p r)) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) q) r) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (pow.f64 q #s(literal 2 binary64))) p) (*.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)))) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) r))) p) (*.f64 #s(literal -1/4 binary64) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) r)) p) (.f64 #s(literal -1/4 binary64) r)))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) r)) p) (.f64 #s(literal -1/2 binary64) r)))))
#s(approx (+ (* r p) r) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal -1 binary64) (/.f64 r p))))))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p) #s(literal 1/2 binary64)))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p))))))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)))) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 #s(literal -1 binary64) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (/ (+ p (+ (fabs p) (fabs r))) r) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (+ p (+ (fabs p) (fabs r))) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) p)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))))))
#s(approx (- p r) (+.f64 p (*.f64 #s(literal -1 binary64) r)))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 p #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (fma.f64 #s(literal -1 binary64) r (*.f64 #s(literal 4 binary64) q)) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))) r))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (*.f64 #s(literal 1/4 binary64) r))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 r (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (*.f64 r (+.f64 #s(literal 1 binary64) p))))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) #s(literal 1/4 binary64))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/4 binary64) (.f64 r (+.f64 #s(literal 1 binary64) p)))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 r (+.f64 #s(literal 1 binary64) p)))))
#s(approx (+ (* r p) r) (*.f64 r (+.f64 #s(literal 1 binary64) p)))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (*.f64 #s(literal -1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) (*.f64 #s(literal 1/2 binary64) r)))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) (*.f64 #s(literal 1/2 binary64) r)) r))
#s(approx (/ (+ p (+ (fabs p) (fabs r))) r) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))
#s(approx (fabs r) (fabs.f64 r))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (*.f64 #s(literal -1 binary64) p)) r)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) p)) r) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) p)) r) (+.f64 (/.f64 (*.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (/.f64 (fabs.f64 (-.f64 p r)) r)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) r)))))))
#s(approx (- p r) (*.f64 r (-.f64 (/.f64 p r) #s(literal 1 binary64))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 p r)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 p r)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (- (* q 4) (+ p r)) (.f64 r (-.f64 (.f64 #s(literal 4 binary64) (/.f64 q r)) (+.f64 #s(literal 1 binary64) (/.f64 p r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (+.f64 (/.f64 (*.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) p))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 (pow.f64 r #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1 binary64) p) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 #s(literal 1/4 binary64) (.f64 r (+.f64 #s(literal 1 binary64) p))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 r (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1 binary64) p) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 r (+.f64 #s(literal 1 binary64) p))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 r (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) p) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)))))
#s(approx (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r)))) r))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (fabs.f64 (+.f64 p (*.f64 #s(literal -1 binary64) r)))))) r))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r)))))) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r)))) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r)))) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (*.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r)))) r))))))
#s(approx (fabs (- p r)) (fabs.f64 (+.f64 p (*.f64 #s(literal -1 binary64) r))))
#s(approx (- p r) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 p r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r))) r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r))) r))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (- (* q 4) (+ p r)) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 4 binary64) q) p) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (pow.f64 q #s(literal 2 binary64))) r) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)) #s(literal 1/2 binary64)))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 r #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) p) #s(literal 1 binary64)))))
#s(approx (* r (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2))) (.f64 (pow.f64 r #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (.f64 #s(literal -1 binary64) p) #s(literal 1 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) r)))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 #s(literal -1/4 binary64) (.f64 r (-.f64 (*.f64 #s(literal -1 binary64) p) #s(literal 1 binary64)))))
#s(approx (* 1/2 (+ (* (+ (* r p) r) 1/2) 1/2)) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal -1 binary64) p) #s(literal 1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 #s(literal -1/2 binary64) (.f64 r (-.f64 (*.f64 #s(literal -1 binary64) p) #s(literal 1 binary64)))))
#s(approx (+ (* (+ (* r p) r) 1/2) 1/2) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) p) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r))))))
#s(approx (+ (* r p) r) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (*.f64 #s(literal -1 binary64) p) #s(literal 1 binary64)))))
#s(approx (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (* (* 4 q) q) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))
#s(approx (* 4 q) (*.f64 #s(literal 4 binary64) q))
#s(approx q q)
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 #s(literal 2 binary64) q))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 q #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))
#s(approx (- (* q 4) (+ p r)) (.f64 q (+.f64 #s(literal 4 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p r) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q) (.f64 #s(literal 1/2 binary64) (fabs.f64 (-.f64 p r)))) q))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q) (*.f64 #s(literal 1/2 binary64) (fabs.f64 (-.f64 p r)))) q))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 #s(literal -2 binary64) q))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q))) q))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q))) q))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))))
#s(approx (- (* q 4) (+ p r)) (.f64 #s(literal -1 binary64) (.f64 q (-.f64 (+.f64 (/.f64 p q) (/.f64 r q)) #s(literal 4 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))

Calls

9 calls:

Time	Variable	Point
10.0ms	p	inf
8.0ms	r	-inf
4.0ms	p	-inf
4.0ms	r	inf
4.0ms	p	0

rewrite318.0ms (5.4%)

Memory

22.0MiB live, 236.6MiB allocated; 34ms collecting garbage

Counts

40 → 164

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))))
(fabs.f64 (-.f64 p r))
(-.f64 p r)
p
r
(sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q)))
(+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 4 binary64) q) q))
(pow.f64 (-.f64 p r) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 #s(literal 4 binary64) q)
#s(literal 4 binary64)
q
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r))))
#s(approx (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))
(*.f64 #s(literal -1/2 binary64) (/.f64 p r))
#s(literal -1/2 binary64)
(/.f64 p r)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 r p r)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
(.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)))))
#s(literal -1 binary64)
(.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))
(/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)
(+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
(fabs.f64 r)

Outputs
(*.f64 (fabs.f64 #s(literal -1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64))))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
(*.f64 (fabs.f64 #s(literal -1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64))))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
r
(*.f64 r r)
(*.f64 (neg.f64 #s(literal -1 binary64)) r)
(*.f64 (neg.f64 r) #s(literal -1 binary64))
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (fabs.f64 #s(literal -1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64))))
(*.f64 (fabs.f64 #s(literal -1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 q #s(literal 4 binary64) #s(literal 1 binary64))))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) q)
(*.f64 q #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 (neg.f64 #s(literal 4 binary64)) (neg.f64 q))
(*.f64 (neg.f64 q) (neg.f64 #s(literal 4 binary64)))
(*.f64 #s(literal 4 binary64) q)
(*.f64 q #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 (neg.f64 #s(literal 4 binary64)) (neg.f64 q))
(*.f64 (neg.f64 q) (neg.f64 #s(literal 4 binary64)))
#s(literal 4 binary64)
(neg.f64 (neg.f64 #s(literal 4 binary64)))
q
(*.f64 q q)
(*.f64 (neg.f64 q) (neg.f64 q))
(*.f64 (pow.f64 (neg.f64 q) #s(literal 3 binary64)) (pow.f64 (neg.f64 q) #s(literal 3 binary64)))
(*.f64 (pow.f64 q (/.f64 #s(literal 3 binary64) #s(literal 1 binary64))) (pow.f64 q (/.f64 #s(literal 3 binary64) #s(literal 1 binary64))))
#s(approx (+ 0 (* q 4)) q)
#s(approx (+ 0 (* q 4)) (.f64 r #s(approx ( 0 1/2) (*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(.f64 r #s(approx ( 0 1/2) (*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (* 0 1/2) (*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)))
(*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) #s(literal -1/2 binary64))
(.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))
(.f64 (neg.f64 r) (.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)))
(.f64 (.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(neg.f64 (neg.f64 #s(literal -1/2 binary64)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) #s(literal 1 binary64))
(*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) #s(literal 1 binary64))
(*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(neg.f64 (neg.f64 #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) #s(literal 1 binary64))
(*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(approx (+ 0 (* q 4)) (-.f64 (.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 r #s(literal 1/2 binary64))))
(*.f64 (neg.f64 r) (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 r))
(.f64 #s(literal -1 binary64) (fma.f64 r #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))))
(.f64 (-.f64 (.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)) r)
(.f64 (fma.f64 r #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal -1 binary64))
#s(literal -1 binary64)
(neg.f64 (neg.f64 #s(literal -1 binary64)))
(*.f64 r (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) r)
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 r (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (fma.f64 (.f64 r #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (fma.f64 (.f64 r #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (fma.f64 #s(literal 1 binary64) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) #s(literal -1/2 binary64))
(.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))
(.f64 (neg.f64 r) (.f64 #s(literal -1/2 binary64) #s(literal 1 binary64)))
(.f64 (.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
p
(*.f64 #s(literal 1 binary64) #s(literal -1 binary64))
r
(*.f64 r r)
(*.f64 (neg.f64 #s(literal -1 binary64)) r)
(*.f64 (neg.f64 r) #s(literal -1 binary64))
(*.f64 (neg.f64 r) (neg.f64 r))

eval44.0ms (0.7%)

Memory: 25.1MiB live, 68.5MiB allocated; 5ms collecting garbage
Compiler: Compiled 15 465 to 1 976 computations (87.2% saved)

prune26.0ms (0.4%)

Memory

-5.6MiB live, 38.9MiB allocated; 2ms collecting garbage

Pruning

26 alts after pruning (22 fresh and 4 done)

	Pruned	Kept	Total
New	334	13	347
Fresh	7	9	16
Picked	3	2	5
Done	0	2	2
Total	344	26	370

Accuracy

99.7%

Counts

370 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.6%	(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
✓	51.8%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
▶	42.5%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
	31.5%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
	32.4%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
	23.3%	#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
	34.1%	#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
	18.5%	#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
✓	32.4%	#s(approx (- (* q 4) (+ p r)) q)
▶	5.4%	#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
	33.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
	5.6%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
	5.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
	32.2%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))
	36.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
	31.8%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
	26.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
▶	19.4%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
✓	5.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
✓	1.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
▶	36.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
	24.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
▶	13.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
	10.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
	14.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
	40.4%	#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))

Compiler

Compiled 1 690 to 1 228 computations (27.3% saved)

series389.0ms (6.7%)

Memory

18.0MiB live, 323.3MiB allocated; 45ms collecting garbage

Counts

37 → 192

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (.f64 #s(literal 4 binary64) q) q))))
(fabs.f64 (-.f64 p r))
(-.f64 p r)
p
r
(sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (.f64 #s(literal 4 binary64) q) q)))
(+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (.f64 #s(literal 4 binary64) q) q))
#s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64)))
(pow.f64 r #s(literal 2 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 #s(literal 4 binary64) q)
#s(literal 4 binary64)
q
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
(fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
(fabs.f64 r)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
(fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))
(.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))
(+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p)))
(+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))
(*.f64 #s(literal -1 binary64) p)

Outputs
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))))
#s(approx (fabs (- p r)) (fabs.f64 (-.f64 p r)))
#s(approx (- p r) (*.f64 #s(literal -1 binary64) r))
#s(approx (- p r) (-.f64 p r))
#s(approx p p)
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) (.f64 p (fma.f64 #s(literal -1 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64)))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 r #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 p (+.f64 p (*.f64 #s(literal -2 binary64) r)) (pow.f64 r #s(literal 2 binary64))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 p (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))) (.f64 p (fma.f64 #s(literal -1/2 binary64) (/.f64 r (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))) (.f64 p (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))))))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (+ (* -1 q) (* 1/2 (+ (fabs p) (fabs r)))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* 1/2 (+ (fabs p) (fabs r))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))
#s(approx (+ (fabs p) (fabs r)) (+.f64 (fabs.f64 p) (fabs.f64 r)))
#s(approx (fabs p) (fabs.f64 p))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal -1/2 binary64) p (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) r))))))
#s(approx (+ (* 1/2 r) (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p))))) (fma.f64 #s(literal 1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (+ (* 1/2 r) (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p))))) (fma.f64 #s(literal -1/2 binary64) p (fma.f64 #s(literal 1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (+ (fabs p) (+ (fabs r) (* -1 p))) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))))
#s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))
#s(approx (+ (fabs r) (* -1 p)) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p)))
#s(approx (* -1 p) (*.f64 #s(literal -1 binary64) p))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (*.f64 #s(literal -1 binary64) r)) p)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) r)) p) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) r)) p) (+.f64 (/.f64 (*.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (/.f64 (fabs.f64 (-.f64 p r)) p)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) p)))))))
#s(approx (- p r) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 r p)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 p (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 r p) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (pow.f64 p #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 r p)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 r p) (/.f64 (pow.f64 r #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) r))) p) (+.f64 (/.f64 (*.f64 (pow.f64 q #s(literal 2 binary64)) r) (pow.f64 p #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 p (-.f64 (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p) #s(literal 1/2 binary64))))
#s(approx (+ (* 1/2 r) (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p))))) (.f64 p (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 r p) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) p))) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (.f64 p (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) p)) #s(literal 1/2 binary64))))
#s(approx (+ (fabs p) (+ (fabs r) (* -1 p))) (*.f64 p (-.f64 (+.f64 (/.f64 (fabs.f64 p) p) (/.f64 (fabs.f64 r) p)) #s(literal 1 binary64))))
#s(approx (+ (fabs r) (* -1 p)) (*.f64 p (-.f64 (/.f64 (fabs.f64 r) p) #s(literal 1 binary64))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p))))) p))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (*.f64 #s(literal -1 binary64) p))))))) p))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (pow.f64 q #s(literal 2 binary64))) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p))))))) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p))))) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p)))) p))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 (neg.f64 (+.f64 r (.f64 #s(literal -1 binary64) p)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (*.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p)))) p))))))
#s(approx (fabs (- p r)) (fabs.f64 (neg.f64 (+.f64 r (*.f64 #s(literal -1 binary64) p)))))
#s(approx (- p r) (.f64 #s(literal -1 binary64) (.f64 p (-.f64 (/.f64 r p) #s(literal 1 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 r p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p))) p))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 r (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) p))) p))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 r #s(literal 2 binary64)) p) (*.f64 #s(literal 2 binary64) r)) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) p) (.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 q #s(literal 2 binary64)) r) p) (pow.f64 q #s(literal 2 binary64))) p) (*.f64 #s(literal 1/2 binary64) (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))))) p))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r))))) p))))))
#s(approx (+ (* 1/2 r) (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) p))))))
#s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) p))))))
#s(approx (+ (fabs p) (+ (fabs r) (* -1 p))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) p))))))
#s(approx (+ (fabs r) (* -1 p)) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fabs.f64 r) p))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))))))
#s(approx (- p r) (+.f64 p (*.f64 #s(literal -1 binary64) r)))
#s(approx r r)
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) (.f64 r (fma.f64 #s(literal -1 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64)))))
#s(approx (pow (- p r) 2) (fma.f64 #s(literal -2 binary64) (*.f64 p r) (pow.f64 p #s(literal 2 binary64))))
#s(approx (pow (- p r) 2) (fma.f64 r (+.f64 r (*.f64 #s(literal -2 binary64) p)) (pow.f64 p #s(literal 2 binary64))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 p r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))))) (.f64 r (fma.f64 #s(literal -1/2 binary64) (/.f64 p (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))) (.f64 r (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 p (.f64 r (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))))))))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (*.f64 #s(literal -1 binary64) p)) r)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) p)) r) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) p)) r) (+.f64 (/.f64 (*.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (/.f64 (fabs.f64 (-.f64 p r)) r)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) r)))))))
#s(approx (- p r) (*.f64 r (-.f64 (/.f64 p r) #s(literal 1 binary64))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 p r)))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 r (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 p r) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 p r)))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (pow (- p r) 2) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r) (+.f64 (/.f64 (*.f64 p (pow.f64 q #s(literal 2 binary64))) (pow.f64 r #s(literal 3 binary64))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r)))) r))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (fabs.f64 (+.f64 p (*.f64 #s(literal -1 binary64) r)))))) r))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r)))))) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r)))) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r)))) r))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 (+.f64 p (.f64 #s(literal -1 binary64) r))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (*.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r)))) r))))))
#s(approx (fabs (- p r)) (fabs.f64 (+.f64 p (*.f64 #s(literal -1 binary64) r))))
#s(approx (- p r) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 p r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r))) r))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 p (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (.f64 #s(literal 2 binary64) (pow.f64 q #s(literal 2 binary64)))) r))) r))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 p #s(literal 2 binary64))) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (pow (- p r) 2) (.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 p #s(literal 2 binary64)) r) (*.f64 #s(literal 2 binary64) p)) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) r) (.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 p (pow.f64 q #s(literal 2 binary64))) r) (pow.f64 q #s(literal 2 binary64))) r) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))) r))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal -1 binary64) (.f64 r (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (+.f64 (fabs.f64 (-.f64 p r)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 (-.f64 p r) #s(literal 2 binary64))))
#s(approx (* (* 4 q) q) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))
#s(approx (* 4 q) (*.f64 #s(literal 4 binary64) q))
#s(approx q q)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (/.f64 (pow.f64 q #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (*.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))) (.f64 (pow.f64 q #s(literal 2 binary64)) (fma.f64 (pow.f64 q #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64))))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 #s(literal 2 binary64) q))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (+ (pow (- p r) 2) (* (* 4 q) q)) (*.f64 (pow.f64 q #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q) (.f64 #s(literal 1/2 binary64) (fabs.f64 (-.f64 p r)))) q))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q) (*.f64 #s(literal 1/2 binary64) (fabs.f64 (-.f64 p r)))) q))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (*.f64 #s(literal -2 binary64) q))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q))) q))))))
#s(approx (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q)))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 p r)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q))) q))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 4 binary64))) (fma.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 6 binary64)) (pow.f64 q #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (pow.f64 q #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) q) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (pow.f64 (-.f64 p r) #s(literal 4 binary64)) (pow.f64 q #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 p r) #s(literal 2 binary64)))) q) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))) q))))))

Calls

9 calls:

Time	Variable	Point
10.0ms	r	-inf
3.0ms	r	inf
3.0ms	p	-inf
3.0ms	p	0
3.0ms	p	inf

rewrite318.0ms (5.4%)

Memory

35.8MiB live, 210.6MiB allocated; 88ms collecting garbage

Counts

37 → 132

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
(+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (.f64 #s(literal 4 binary64) q) q))))
(fabs.f64 (-.f64 p r))
(-.f64 p r)
p
r
(sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (.f64 #s(literal 4 binary64) q) q)))
(+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (.f64 #s(literal 4 binary64) q) q))
#s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64)))
(pow.f64 r #s(literal 2 binary64))
(.f64 (.f64 #s(literal 4 binary64) q) q)
(*.f64 #s(literal 4 binary64) q)
#s(literal 4 binary64)
q
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
(fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))
#s(literal -1 binary64)
(*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))
(+.f64 (fabs.f64 p) (fabs.f64 r))
(fabs.f64 p)
(fabs.f64 r)
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
(fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))
(.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))
(+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p)))
(+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))
(*.f64 #s(literal -1 binary64) p)

Outputs
(*.f64 #s(literal 1 binary64) (+.f64 (-.f64 p r) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) #s(literal 1 binary64)))))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
(+.f64 (-.f64 p r) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) #s(literal 1 binary64))))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
p
(*.f64 #s(literal -1 binary64) p)
(*.f64 p #s(literal -1 binary64))
(*.f64 p #s(literal 1/2 binary64))
(*.f64 p #s(literal 1 binary64))
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 #s(approx (+ 2 p) r) #s(literal 1 binary64)))
(+.f64 #s(approx (+ 2 p) r) #s(literal 1 binary64))
#s(approx (+ 2 p) r)
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(literal 4 binary64)
(neg.f64 (neg.f64 #s(literal 4 binary64)))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(approx 2 #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(literal 1/2 binary64)
(neg.f64 (neg.f64 #s(literal 1/2 binary64)))
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 0 binary64)
q
(*.f64 #s(literal 4 binary64) #s(literal 1 binary64))
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
#s(literal -1 binary64)
(neg.f64 (neg.f64 #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
p
(*.f64 #s(literal -1 binary64) p)
(*.f64 p #s(literal -1 binary64))
(*.f64 p #s(literal 1/2 binary64))
(*.f64 p #s(literal 1 binary64))
r
(*.f64 r r)
(*.f64 (neg.f64 r) (neg.f64 r))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 3 binary64)) (pow.f64 (neg.f64 r) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 r) #s(literal 1/2 binary64)))
#s(approx (+ 2 p) #s(approx (+ (* p r) r) (-.f64 p r)))
#s(approx (+ (* p r) r) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(*.f64 #s(literal 1/2 binary64) (-.f64 p r))
(.f64 (.f64 #s(literal 4 binary64) #s(literal 4 binary64)) (-.f64 p r))
(*.f64 (neg.f64 #s(literal -1 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
(.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 p r))
p
(*.f64 #s(literal -1 binary64) p)
(*.f64 p #s(literal -1 binary64))
(*.f64 p #s(literal 1/2 binary64))
(*.f64 p #s(literal 1 binary64))

eval32.0ms (0.5%)

Memory: 6.6MiB live, 49.4MiB allocated; 4ms collecting garbage
Compiler: Compiled 11 832 to 1 477 computations (87.5% saved)

prune24.0ms (0.4%)

Memory

-22.8MiB live, 24.1MiB allocated; 9ms collecting garbage

Pruning

23 alts after pruning (16 fresh and 7 done)

	Pruned	Kept	Total
New	244	4	248
Fresh	5	12	17
Picked	2	3	5
Done	0	4	4
Total	251	23	274

Accuracy

99.7%

Counts

274 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	51.8%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
✓	42.5%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
	24.6%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
	31.5%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
	32.4%	(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
	23.3%	#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
	18.5%	#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
✓	32.4%	#s(approx (- (* q 4) (+ p r)) q)
	35.6%	#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
	5.4%	#s(approx (+ 2 p) #s(literal 1 binary64))
	33.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
	32.2%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))
	36.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
	31.8%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
	26.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
✓	19.4%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
✓	5.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
✓	1.3%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
	36.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
	24.9%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
✓	13.1%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
	10.5%	#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
	40.4%	#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))

Compiler

Compiled 810 to 581 computations (28.3% saved)

regimes338.0ms (5.8%)

Memory

62.1MiB live, 465.9MiB allocated; 24ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

2 → 1

11 → 2

14 → 3

18 → 3

24 → 3

27 → 3

30 → 3

34 → 3

42 → 3

43 → 3

44 → 3

45 → 3

53 → 3

Calls

Call 1

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))

Outputs
#s(approx (+ 2 p) #s(literal 1 binary64))

Call 2

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)

Outputs
#s(approx (- (* q 4) (+ p r)) q)

Call 3

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))

Outputs
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (- (* q 4) (+ p r)) q)

Call 4

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))

Outputs
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))

Call 5

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))

Outputs
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))

Call 6

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))

Outputs
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (- (* q 4) (+ p r)) q)
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 7

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))

Outputs

#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))

#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 8

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))

Outputs

#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 9

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))

Outputs

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 10

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))

Outputs

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 11

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))

Outputs

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))

(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) q) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 12

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))

Outputs

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))

(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) q) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 13

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))

Outputs

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))

(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) q) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Call 14

Inputs
#s(approx (+ 2 p) #s(literal 1 binary64))
#s(approx (- (* q 4) (+ p r)) q)
#s(approx (+ 2 p) #s(approx (+ (* (+ 2 p) -1/2) 2) (-.f64 p r)))
#s(approx (+ 0 (* q 4)) (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) q))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal 1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal -1/2 binary64) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (*.f64 #s(literal 1/2 binary64) p))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) p))
#s(approx (- (* q 4) (+ p r)) (-.f64 (*.f64 #s(literal 4 binary64) q) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 r (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- (* q 4) (+ p r)) (*.f64 #s(literal -1 binary64) (+.f64 p r)))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r #s(approx (+ 1/2 ( 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r))) (*.f64 #s(literal -1/2 binary64) (/.f64 p r)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) ( 4 (pow q 2))))) (*.f64 #s(literal 2 binary64) q)))
(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) r))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (fma.f64 #s(literal -1 binary64) q (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (fma.f64 #s(literal -1/2 binary64) r (*.f64 #s(literal 1/2 binary64) (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r)))))))
#s(approx (* (/ 1 2) (+ (fabs (- p r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fabs.f64 (-.f64 p r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 r p r) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* -1 (* q (+ 1 (* -1/2 (/ (+ (fabs p) (fabs r)) q))))) (.f64 q (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) #s(approx (+ (fabs r) (* -1 p)) (fabs.f64 r))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 q (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r #s(approx (* 1/2 (+ (fabs p) (+ (fabs r) (* -1 p)))) (fma.f64 #s(literal -1/2 binary64) p (*.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (fabs.f64 r))))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) #s(approx (* r (+ 1/2 (* 1/2 (/ (+ (fabs p) (+ (fabs r) (* -1 p))) r)))) (fma.f64 #s(literal 1/2 binary64) r (.f64 #s(literal 1/2 binary64) (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (.f64 #s(literal -1 binary64) p)))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) #s(approx (* -1 (* r (+ 1/2 (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r))))) (.f64 r (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r)) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 q (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) q))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (.f64 r (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) p))) r)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 p (+.f64 (fabs.f64 p) (fabs.f64 r))) r))))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 p (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (fabs.f64 p) (+.f64 (fabs.f64 r) (*.f64 #s(literal -1 binary64) r))) p)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (+ 2 p) r) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* (* 4 q) q))))) (.f64 #s(literal -1 binary64) (.f64 r (+.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (/ (+ p (+ (fabs p) (fabs r))) r)) (.f64 p (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (fabs.f64 p) r) (/.f64 (fabs.f64 r) r)) p)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) r)))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 #s(approx (pow (- p r) 2) (pow.f64 r #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) q) q)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( 4 (pow q 2))) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (.f64 (pow.f64 p #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) p) (*.f64 #s(literal 2 binary64) r)) p))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 p r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( 4 (pow q 2))) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))
(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 #s(approx (+ (pow (- p r) 2) ( (* 4 q) q)) (*.f64 (pow.f64 r #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 p r) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 q #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64))) (/.f64 (pow.f64 p #s(literal 2 binary64)) (pow.f64 r #s(literal 2 binary64)))))))))))

Outputs

#s(approx (* (/ 1 2) (+ (+ (fabs p) (fabs r)) (sqrt (+ (pow (- p r) 2) (* 4 (pow q 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 p (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 r (+.f64 (fabs.f64 p) (fabs.f64 r))) p))))))

(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) q) q)))))

(*.f64 (fma.f64 q #s(literal 4 binary64) (-.f64 p r)) #s(literal 1 binary64))

Calls

45 calls:

16.0ms	r
14.0ms	(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))
14.0ms	p
14.0ms	(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))
14.0ms	q

Results

Accuracy	Segments	Branch
5.4%	1	`p`
5.4%	1	`(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))`
5.4%	1	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))`
5.4%	1	`r`
5.4%	1	`(pow.f64 q #s(literal 2 binary64))`
5.4%	1	`(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))`
5.4%	1	`q`
32.4%	1	`(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))`
32.4%	1	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))`
32.4%	1	`r`
32.4%	1	`p`
32.4%	1	`(pow.f64 q #s(literal 2 binary64))`
32.4%	1	`(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))`
32.4%	1	`q`
44.6%	2	`r`
49.9%	2	`(pow.f64 q #s(literal 2 binary64))`
49.9%	2	`(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))`
49.9%	2	`q`
40.5%	2	`(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))`
40.5%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))`
48.6%	2	`p`
60.7%	3	`p`
62.0%	3	`p`
58.0%	3	`r`
62.6%	3	`p`
66.0%	3	`p`
66.0%	3	`p`
66.6%	3	`p`
59.5%	3	`(pow.f64 q #s(literal 2 binary64))`
59.5%	3	`(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))`
59.5%	3	`q`
66.6%	3	`p`
70.2%	3	`p`
64.6%	4	`r`
58.8%	2	`(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))`
58.8%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))`
70.2%	3	`p`
73.6%	3	`p`
66.8%	3	`(pow.f64 q #s(literal 2 binary64))`
66.8%	3	`(*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))`
70.1%	2	`(+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64))))))`
70.1%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (+.f64 (fabs.f64 p) (fabs.f64 r)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 p r) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (pow.f64 q #s(literal 2 binary64)))))))`
74.1%	3	`p`
70.5%	3	`r`
66.8%	3	`q`

Compiler

Compiled 2 093 to 577 computations (72.4% saved)

bsearch39.0ms (0.7%)

Memory

-32.7MiB live, 59.2MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
15.0ms	1.619974405538669e+55	8.346343296237363e+57
17.0ms	-6.075042155191554e+46	-6.756695585026678e+44

Samples

18.0ms

240×

valid

Compiler

Compiled 699 to 605 computations (13.4% saved)

Precisions

Click to see histograms. Total time spent on operations: 12.0ms

ival-pow2: 4.0ms (32.8% of total)

ival-fabs: 2.0ms (16.4% of total)

ival-sqrt: 2.0ms (16.4% of total)

ival-add!: 2.0ms (16.4% of total)

ival-mult!: 2.0ms (16.4% of total)

ival-sub!: 1.0ms (8.2% of total)

adjust: 0.0ms (0% of total)

bsearch3.0ms (0.1%)

Memory

6.3MiB live, 6.3MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.619974405538669e+55	8.346343296237363e+57
1.0ms	-6.075042155191554e+46	-6.756695585026678e+44

Compiler

Compiled 684 to 575 computations (15.9% saved)

bsearch59.0ms (1%)

Memory

5.0MiB live, 54.8MiB allocated; 38ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
43.0ms	4.4757716002005495e+46	2.5002889247959803e+50
11.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Samples

45.0ms

224×

valid

Compiler

Compiled 693 to 596 computations (14% saved)

Precisions

Click to see histograms. Total time spent on operations: 40.0ms

ival-fabs: 31.0ms (77.6% of total)

ival-pow2: 4.0ms (10% of total)

ival-add!: 2.0ms (5% of total)

ival-mult!: 2.0ms (5% of total)

ival-sub!: 1.0ms (2.5% of total)

ival-sqrt: 1.0ms (2.5% of total)

adjust: 0.0ms (0% of total)

bsearch3.0ms (0.1%)

Memory

6.2MiB live, 6.2MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.4757716002005495e+46	2.5002889247959803e+50
1.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Compiler

Compiled 679 to 582 computations (14.3% saved)

bsearch31.0ms (0.5%)

Memory

2.4MiB live, 48.1MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
21.0ms	3.571302851814621e-59	2.1173661648476421e-50
6.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Samples

19.0ms

192×

valid

Compiler

Compiled 877 to 732 computations (16.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 14.0ms

ival-mult!: 6.0ms (41.5% of total)

ival-pow2: 3.0ms (20.8% of total)

ival-fabs: 2.0ms (13.8% of total)

ival-sqrt: 1.0ms (6.9% of total)

ival-add!: 1.0ms (6.9% of total)

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

bsearch3.0ms (0.1%)

Memory

7.2MiB live, 7.2MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.571302851814621e-59	2.1173661648476421e-50
1.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Compiler

Compiled 1 033 to 780 computations (24.5% saved)

bsearch3.0ms (0%)

Memory

5.5MiB live, 5.5MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.571302851814621e-59	2.1173661648476421e-50
1.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Compiler

Compiled 715 to 612 computations (14.4% saved)

bsearch3.0ms (0%)

Memory

5.7MiB live, 5.7MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.571302851814621e-59	2.1173661648476421e-50
1.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Compiler

Compiled 685 to 567 computations (17.2% saved)

bsearch46.0ms (0.8%)

Memory

-25.0MiB live, 66.6MiB allocated; 12ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
20.0ms	4.7267264416649974e-111	4.1916410761406786e-104
21.0ms	-1.3583445590155185e+27	-1.1211602935097925e+22

Samples

22.0ms

288×

valid

Compiler

Compiled 376 to 375 computations (0.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 15.0ms

ival-pow2: 5.0ms (34.3% of total)

ival-fabs: 3.0ms (20.6% of total)

ival-sqrt: 2.0ms (13.7% of total)

ival-add!: 2.0ms (13.7% of total)

ival-mult!: 2.0ms (13.7% of total)

ival-sub!: 1.0ms (6.9% of total)

adjust: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

4.3MiB live, 4.3MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.571302851814621e-59	2.1173661648476421e-50
1.0ms	-1.3583445590155185e+27	-1.1211602935097925e+22

Compiler

Compiled 439 to 402 computations (8.4% saved)

bsearch6.0ms (0.1%)

Memory

10.3MiB live, 10.3MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.571302851814621e-59	2.1173661648476421e-50
4.0ms	-6.756695585026678e+44	-8.758320038337102e+43

Samples

2.0ms

32×

valid

Compiler

Compiled 361 to 333 computations (7.8% saved)

Precisions

Click to see histograms. Total time spent on operations: 2.0ms

ival-pow2: 1.0ms (60.8% of total)

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-fabs: 0.0ms (0% of total)

ival-sqrt: 0.0ms (0% of total)

ival-add!: 0.0ms (0% of total)

ival-mult!: 0.0ms (0% of total)

bsearch22.0ms (0.4%)

Memory

-24.5MiB live, 26.1MiB allocated; 10ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
20.0ms	2.501211803689855e+68	5.377248620877877e+69

Samples

16.0ms

112×

valid

Compiler

Compiled 193 to 171 computations (11.4% saved)

Precisions

Click to see histograms. Total time spent on operations: 6.0ms

ival-pow2: 2.0ms (35.5% of total)

ival-fabs: 1.0ms (17.7% of total)

ival-sqrt: 1.0ms (17.7% of total)

ival-add!: 1.0ms (17.7% of total)

ival-mult!: 1.0ms (17.7% of total)

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

derivations4.0ms (0.1%)

Memory

10.0MiB live, 10.0MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 824 to 147 computations (82.2% saved)

preprocess155.0ms (2.7%)

Memory: 30.9MiB live, 356.5MiB allocated; 39ms collecting garbage
Remove: (abs q)
Compiler: Compiled 2 494 to 1 173 computations (53% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

start0.0ms (0%)

analyze0.0ms (0%)

sample2.0s (34.9%)

preprocess30.0ms (0.5%)

series281.0ms (4.8%)

rewrite237.0ms (4%)

eval23.0ms (0.4%)

prune15.0ms (0.3%)

series459.0ms (7.8%)

rewrite330.0ms (5.6%)

eval41.0ms (0.7%)

prune31.0ms (0.5%)

series493.0ms (8.4%)

rewrite318.0ms (5.4%)

eval44.0ms (0.7%)

prune26.0ms (0.4%)

series389.0ms (6.7%)

rewrite318.0ms (5.4%)

eval32.0ms (0.5%)

prune24.0ms (0.4%)

regimes338.0ms (5.8%)

bsearch39.0ms (0.7%)

bsearch3.0ms (0.1%)

bsearch59.0ms (1%)

bsearch3.0ms (0.1%)

bsearch31.0ms (0.5%)

bsearch3.0ms (0.1%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch46.0ms (0.8%)

bsearch2.0ms (0%)

bsearch6.0ms (0.1%)

bsearch22.0ms (0.4%)

derivations4.0ms (0.1%)

preprocess155.0ms (2.7%)

end0.0ms (0%)

Profiling