Henrywood and Agarwal, Equation (9a)

Time bar (total: 4.1s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze595.0ms (14.7%)

Memory
59.7MiB live, 926.5MiB allocated; 238ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.7%0.3%0%0%0%0
0%0%99.7%0.3%0%0%0%1
0%0%99.7%0.3%0%0%0%2
0%0%99.7%0.3%0%0%0%3
0%0%99.7%0.3%0%0%0%4
0%0%99.7%0.3%0%0%0%5
0%0%99.7%0.3%0%0%0%6
12.5%12.5%87.2%0.3%0%0%0%7
12.5%12.5%87.2%0.3%0%0%0%8
12.5%12.5%87.2%0.3%0%0%0%9
12.5%12.5%87.2%0.3%0%0%0%10
12.5%12.5%87.2%0.3%0%0%0%11
18.8%18.7%81%0.3%0%0%0%12
Compiler

Compiled 20 to 19 computations (5% saved)

sample1.6s (40.2%)

Memory
22.9MiB live, 3 077.3MiB allocated; 495ms collecting garbage
Samples
825.0ms8 256×0valid
328.0ms2 804×0invalid
Precisions
Click to see histograms. Total time spent on operations: 679.0ms
ival-mult!: 294.0ms (43.3% of total)
ival-div!: 152.0ms (22.4% of total)
ival-pow2: 119.0ms (17.5% of total)
ival-sqrt: 84.0ms (12.4% of total)
ival-sub!: 29.0ms (4.3% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

preprocess60.0ms (1.5%)

Memory
-24.5MiB live, 83.0MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0168514
1684510
23087510
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
Symmetry

(abs M)

(abs D)

(abs d)

(negabs w0)

(sort M D)

Compiler

Compiled 36 to 34 computations (5.6% saved)

series102.0ms (2.5%)

Memory
11.0MiB live, 242.7MiB allocated; 21ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06496774
Stop Event
iter-limit
Counts
17 → 108
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
#s(literal 2 binary64)
d
(/.f64 h l)
h
l
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx w0 w0)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (pow (/ (* M D) (* 2 d)) 2) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (pow.f64 d #s(literal 2 binary64)))))
#s(approx (/ (* M D) (* 2 d)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D M) d)))
#s(approx (* M D) (*.f64 D M))
#s(approx M M)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (*.f64 (pow.f64 M #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 M #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx D D)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (*.f64 (pow.f64 D #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 D #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 M #s(literal 4 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) h)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (/ h l) (/.f64 h l))
#s(approx h h)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (*.f64 h (-.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (*.f64 h (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 #s(literal 1 binary64) h))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))))) l))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64))))))))) l))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))) l))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (/.f64 (-.f64 l (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx l l)
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (+.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 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64))))))))) d))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) d))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))) d))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 (pow.f64 d #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) (/.f64 (-.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* 2 d) (*.f64 #s(literal 2 binary64) d))
#s(approx d d)
Calls

18 calls:

TimeVariablePoint
9.0ms
l
inf
7.0ms
D
-inf
7.0ms
M
0
6.0ms
d
0
4.0ms
d
-inf

rewrite67.0ms (1.6%)

Memory
-15.2MiB live, 78.8MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01795
02695
19195
075095
Stop Event
iter-limit
iter-limit
node-limit
iter-limit
Counts
17 → 190
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
(*.f64 M D)
M
D
(*.f64 #s(literal 2 binary64) d)
#s(literal 2 binary64)
d
(/.f64 h l)
h
l
Outputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))))
w0
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(*.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)) l)
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))))))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h))) (*.f64 #s(literal 2 binary64) l))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64)) (neg.f64 (expm1.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 3 binary64))))))
(neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal -1 binary64)))
(fma.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) h) (/.f64 #s(literal 1 binary64) l) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l) #s(literal 1 binary64))
(fma.f64 (/.f64 h l) (neg.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (neg.f64 (/.f64 h l)) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 3 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) (fma.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))) (/.f64 h l)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))
(+.f64 (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))))
#s(literal 1 binary64)
(*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 h l) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1 binary64)) (/.f64 (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1 binary64))
(*.f64 (/.f64 h l) (/.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1 binary64)))
(*.f64 (/.f64 h l) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))))
(*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 (/.f64 h l) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 h l)))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)) l)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (neg.f64 h)) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1 binary64)) (/.f64 l h))
(/.f64 (*.f64 (neg.f64 h) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) (neg.f64 l))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 l h))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)) (*.f64 #s(literal 2 binary64) l))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)) (neg.f64 l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) (*.f64 l #s(literal 1 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(/.f64 (*.f64 (neg.f64 (/.f64 h l)) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))) #s(literal -1 binary64))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 l h))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))
(*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 M #s(literal 1/2 binary64))) (/.f64 D d))
(*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) M) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 D M)) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 M #s(literal 1/2 binary64))) (*.f64 (/.f64 D d) (/.f64 D d)))
(*.f64 (*.f64 M M) (*.f64 (/.f64 D (+.f64 d d)) (/.f64 D (+.f64 d d))))
(*.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 (fabs.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) (fabs.f64 (*.f64 (/.f64 D (+.f64 d d)) M)))
(*.f64 (neg.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) (neg.f64 (*.f64 (/.f64 D (+.f64 d d)) M)))
(*.f64 (exp.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M))) (exp.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M))))
(*.f64 (pow.f64 (*.f64 M #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 D d) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 D M) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 2 binary64)))
(*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 (/.f64 D (+.f64 d d)) #s(literal 2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (*.f64 (/.f64 D d) (*.f64 (/.f64 D (+.f64 d d)) M)))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 D M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (/.f64 D (+.f64 d d)) M)))
(*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M))) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) d)
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (neg.f64 D) M)) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 D M)) (+.f64 d d))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1 binary64)) (/.f64 (+.f64 d d) (*.f64 D M)))
(/.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (*.f64 (/.f64 D (+.f64 d d)) M)) d)
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 #s(literal -2 binary64) d))
(/.f64 (*.f64 (*.f64 D M) (*.f64 (/.f64 D (+.f64 d d)) M)) (+.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) (*.f64 d d))
(/.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (*.f64 (neg.f64 D) M)) (*.f64 d (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (*.f64 D M)) (*.f64 d (+.f64 d d)))
(/.f64 (*.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 d (/.f64 (+.f64 d d) (*.f64 D M))))
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) d) d))
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 (neg.f64 D) M)) (*.f64 (*.f64 #s(literal -2 binary64) d) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) (*.f64 D M)) (*.f64 (*.f64 #s(literal -2 binary64) d) (+.f64 d d)))
(/.f64 (*.f64 (*.f64 (neg.f64 D) M) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) d) (/.f64 (+.f64 d d) (*.f64 D M))))
(/.f64 (*.f64 (*.f64 D M) (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) (*.f64 (+.f64 d d) d))
(/.f64 (*.f64 (*.f64 D M) (*.f64 (neg.f64 D) M)) (*.f64 (+.f64 d d) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1 binary64)) (*.f64 (+.f64 d d) (/.f64 (+.f64 d d) (*.f64 D M))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) d))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 D) M)) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (*.f64 #s(literal -2 binary64) d)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 D M)) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (+.f64 d d)))
(/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 (+.f64 d d) (*.f64 D M)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M))))
(fabs.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1/2 binary64)))
(*.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))
(*.f64 (/.f64 M d) (/.f64 D #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 M #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 D d) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 D M) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) d) #s(literal 1 binary64)))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 (/.f64 D (+.f64 d d)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) d))
(*.f64 (/.f64 D (+.f64 d d)) M)
(*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 D M))
(*.f64 (/.f64 D d) (*.f64 M #s(literal 1/2 binary64)))
(*.f64 (*.f64 M #s(literal 1/2 binary64)) (/.f64 D d))
(*.f64 (*.f64 (neg.f64 D) M) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) d)))
(*.f64 (*.f64 D M) (/.f64 #s(literal 1/2 binary64) d))
(*.f64 D (*.f64 M (/.f64 #s(literal 1/2 binary64) d)))
(*.f64 D (/.f64 M (+.f64 d d)))
(*.f64 M (/.f64 D (+.f64 d d)))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 D (+.f64 d d)) M))
(pow.f64 (/.f64 (+.f64 d d) (*.f64 D M)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1 binary64))
(/.f64 (*.f64 (*.f64 M #s(literal 1/2 binary64)) D) d)
(/.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 D M) d) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1 binary64)) (+.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64))) (neg.f64 d))
(/.f64 (neg.f64 (*.f64 (neg.f64 D) M)) (neg.f64 (*.f64 #s(literal -2 binary64) d)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 d d) (*.f64 D M))))
(/.f64 (*.f64 (*.f64 D M) #s(literal 1/2 binary64)) d)
(/.f64 (*.f64 (neg.f64 D) M) (*.f64 #s(literal -2 binary64) d))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 d d) (*.f64 D M))))
(/.f64 (*.f64 D M) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (*.f64 D M) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 d d) (*.f64 D M)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M)))
(neg.f64 (/.f64 (*.f64 D M) (*.f64 #s(literal -2 binary64) d)))
(neg.f64 (/.f64 (*.f64 (neg.f64 D) M) (+.f64 d d)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64)))
(*.f64 D M)
(*.f64 M D)
M
D
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 d d)) d)
(*.f64 d #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) d)
(/.f64 (-.f64 (*.f64 d d) (*.f64 d d)) (-.f64 d d))
(/.f64 (+.f64 (pow.f64 d #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (fma.f64 d d (-.f64 (*.f64 d d) (*.f64 d d))))
(fma.f64 d #s(literal 1 binary64) (*.f64 d #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) d (*.f64 #s(literal 1 binary64) d))
(-.f64 d (neg.f64 d))
(+.f64 (*.f64 d #s(literal 1 binary64)) (*.f64 d #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) d) (*.f64 #s(literal 1 binary64) d))
(+.f64 d d)
#s(literal 2 binary64)
d
(*.f64 (/.f64 #s(literal 1 binary64) l) h)
(*.f64 (neg.f64 h) (/.f64 #s(literal 1 binary64) (neg.f64 l)))
(*.f64 h (/.f64 #s(literal 1 binary64) l))
(*.f64 #s(literal 1 binary64) (/.f64 h l))
(pow.f64 (/.f64 l h) #s(literal -1 binary64))
(/.f64 (*.f64 h #s(literal 1 binary64)) l)
(/.f64 (neg.f64 (neg.f64 h)) (neg.f64 (neg.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 l h)))
(/.f64 (neg.f64 h) (neg.f64 l))
(/.f64 h l)
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 l h)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 l h) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 l h))
(neg.f64 (/.f64 h (neg.f64 l)))
(neg.f64 (/.f64 (neg.f64 h) l))
h
l

eval53.0ms (1.3%)

Memory
49.9MiB live, 133.6MiB allocated; 25ms collecting garbage
Compiler

Compiled 11 841 to 1 734 computations (85.4% saved)

prune22.0ms (0.5%)

Memory
5.1MiB live, 46.7MiB allocated; 13ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New27512287
Fresh000
Picked101
Done000
Total27612288
Accuracy
89.1%
Counts
288 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
62.1%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
68.4%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
76.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l)))))
77.8%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
64.4%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 D (+.f64 d d)) (/.f64 D (+.f64 d d)))) (/.f64 h l)))))
19.2%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) d)))
21.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
1.2%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
2.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
61.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
20.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
19.1%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
Compiler

Compiled 716 to 566 computations (20.9% saved)

series182.0ms (4.5%)

Memory
-28.9MiB live, 218.2MiB allocated; 85ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07238094
Stop Event
iter-limit
Counts
47 → 136
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))
#s(literal 1 binary64)
(*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M))
(/.f64 h l)
h
l
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
M
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)
(/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (*.f64 D M) (*.f64 D M))
(*.f64 D M)
(*.f64 (+.f64 d d) (+.f64 d d))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l)))
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l))
(pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (+.f64 d d))
(*.f64 M D)
#s(literal 2 binary64)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
(*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
(*.f64 (pow.f64 M #s(literal 2 binary64)) h)
(pow.f64 M #s(literal 2 binary64))
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx w0 w0)
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l))))
#s(approx (* (/ D (+ d d)) M) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D M) d)))
#s(approx M M)
#s(approx (* (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) h) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64)))))
#s(approx (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (pow.f64 d #s(literal 2 binary64)))))
#s(approx (* (* D M) (* D M)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))))
#s(approx (* D M) (*.f64 D M))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (/ (* (pow M 2) h) (* (pow d 2) l)) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (* (pow M 2) h) (*.f64 (pow.f64 M #s(literal 2 binary64)) h))
#s(approx (pow M 2) (pow.f64 M #s(literal 2 binary64)))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (*.f64 (pow.f64 M #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 M #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (/ D (+ d d)) (*.f64 #s(literal 1/2 binary64) (/.f64 D d)))
#s(approx D D)
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (*.f64 (pow.f64 D #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 D #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 M #s(literal 4 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) h)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (/ h l) (/.f64 h l))
#s(approx h h)
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (*.f64 h (-.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (*.f64 h (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 #s(literal 1 binary64) h))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))))) l))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64))))))))) l))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))) l))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (/.f64 (-.f64 l (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx l l)
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (* (pow d 2) l) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (+.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 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))))) d))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64))))))))) d))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) d))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))) d))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 (pow.f64 d #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (/.f64 (-.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (+ d d) (*.f64 #s(literal 2 binary64) d))
#s(approx d d)
#s(approx (* (+ d d) (+ d d)) (*.f64 #s(literal 4 binary64) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d))
#s(approx (pow d 2) (pow.f64 d #s(literal 2 binary64)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d)))
Calls

18 calls:

TimeVariablePoint
26.0ms
w0
-inf
11.0ms
M
0
9.0ms
d
inf
8.0ms
D
0
7.0ms
h
-inf

rewrite46.0ms (1.1%)

Memory
-9.5MiB live, 40.1MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
055534
091465
0369465
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
47 → 191
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))
#s(literal 1 binary64)
(*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M))
(/.f64 h l)
h
l
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
M
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h)
(/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (*.f64 D M) (*.f64 D M))
(*.f64 D M)
(*.f64 (+.f64 d d) (+.f64 d d))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l)))
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l))
(pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64))
(/.f64 (*.f64 M D) (+.f64 d d))
(*.f64 M D)
#s(literal 2 binary64)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
(*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
(*.f64 (pow.f64 M #s(literal 2 binary64)) h)
(pow.f64 M #s(literal 2 binary64))
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
Outputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))))
w0
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)) l)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))) (*.f64 M (/.f64 D (+.f64 d d)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
#s(literal 1 binary64)
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)))
(*.f64 (/.f64 h l) (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)))
(*.f64 (*.f64 (/.f64 h l) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 M (/.f64 D (+.f64 d d))))
(/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l)
(*.f64 h (/.f64 #s(literal 1 binary64) l))
(/.f64 (neg.f64 h) (neg.f64 l))
(/.f64 h l)
(/.f64 #s(literal 1 binary64) (/.f64 l h))
h
l
(*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(*.f64 M (/.f64 D (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 (/.f64 (*.f64 M D) #s(literal 2 binary64)) d)
(/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (+.f64 d d)))
(/.f64 (*.f64 M D) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 M D)))
(*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(/.f64 (neg.f64 D) (neg.f64 (+.f64 d d)))
(/.f64 D (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D))
D
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 d d)) d)
(*.f64 #s(literal 2 binary64) d)
(*.f64 d #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 d d) (*.f64 d d)) (-.f64 d d))
(/.f64 (+.f64 (pow.f64 d #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (fma.f64 d d (-.f64 (*.f64 d d) (*.f64 d d))))
(-.f64 d (neg.f64 d))
(+.f64 d d)
d
M
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)) l)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))) (*.f64 M (/.f64 D (+.f64 d d)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)))
(*.f64 (/.f64 h l) (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)
(*.f64 h (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)) (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (+.f64 d d)) (+.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) D) M)) (neg.f64 (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)))
(exp.f64 (*.f64 (log.f64 (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 M D) D) M)
(*.f64 (*.f64 D D) (*.f64 M M))
(*.f64 (fabs.f64 (*.f64 M D)) (fabs.f64 (*.f64 M D)))
(*.f64 (neg.f64 (*.f64 M D)) (neg.f64 (*.f64 M D)))
(*.f64 (*.f64 M D) (*.f64 M D))
(*.f64 D (*.f64 M (*.f64 M D)))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(*.f64 M D)
(*.f64 D M)
(*.f64 (fabs.f64 (+.f64 d d)) (fabs.f64 (+.f64 d d)))
(*.f64 (neg.f64 (+.f64 d d)) (neg.f64 (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(pow.f64 (+.f64 d d) #s(literal 2 binary64))
(fma.f64 (+.f64 d d) d (*.f64 (+.f64 d d) d))
(fma.f64 d (+.f64 d d) (*.f64 d (+.f64 d d)))
(+.f64 (*.f64 (+.f64 d d) d) (*.f64 (+.f64 d d) d))
(+.f64 (*.f64 d (+.f64 d d)) (*.f64 d (+.f64 d d)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)) l)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))) (*.f64 M (/.f64 D (+.f64 d d)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)))
(*.f64 (/.f64 h l) (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)))
(*.f64 (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)) (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (+.f64 d d)) (+.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M D) D) M)) (neg.f64 (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)))
(exp.f64 (*.f64 (log.f64 (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 2 binary64)))
(*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(*.f64 M (/.f64 D (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 (/.f64 (*.f64 M D) #s(literal 2 binary64)) d)
(/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (+.f64 d d)))
(/.f64 (*.f64 M D) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 M D)))
(*.f64 M D)
(*.f64 D M)
#s(literal 2 binary64)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)
(*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) l))
#s(literal 1/4 binary64)
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))
(/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 M M) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 M M) h)))
(*.f64 (*.f64 M M) h)
(*.f64 h (*.f64 M M))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(*.f64 (*.f64 d d) l)
(*.f64 l (*.f64 d d))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))

eval33.0ms (0.8%)

Memory
20.5MiB live, 65.9MiB allocated; 3ms collecting garbage
Compiler

Compiled 13 240 to 1 772 computations (86.6% saved)

prune21.0ms (0.5%)

Memory
-10.0MiB live, 34.1MiB allocated; 6ms collecting garbage
Pruning

16 alts after pruning (15 fresh and 1 done)

PrunedKeptTotal
New26514279
Fresh617
Picked415
Done000
Total27516291
Accuracy
91.5%
Counts
291 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
68.0%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
22.9%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
64.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h) (*.f64 (+.f64 d d) (+.f64 d d))) l))))
85.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
78.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))))
76.3%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))))
81.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
20.8%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)))))))
21.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))))))
25.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
10.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
2.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
25.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))))
2.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))))
61.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
20.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
Compiler

Compiled 1 148 to 865 computations (24.7% saved)

series171.0ms (4.2%)

Memory
34.0MiB live, 321.1MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08028758
Stop Event
iter-limit
Counts
56 → 162
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M))
(/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l)
(*.f64 h (*.f64 M (/.f64 D (+.f64 d d))))
h
(*.f64 M (/.f64 D (+.f64 d d)))
M
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
l
(*.f64 (/.f64 D (+.f64 d d)) M)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))
#s(literal -1/4 binary64)
(*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 M M)
(/.f64 h (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 M D)
(/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(/.f64 h l)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))
(/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)
(*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)
(*.f64 (pow.f64 M #s(literal 2 binary64)) h)
(pow.f64 M #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx w0 w0)
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (/ (* h (* M (/ D (+ d d)))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l))))
#s(approx (* h (* M (/ D (+ d d)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) d)))
#s(approx (* M (/ D (+ d d))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D M) d)))
#s(approx M M)
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* -1/4 (* (* M M) (/ h (* (* d d) l)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (* (* M M) (/ h (* (* d d) l))) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (* M M) (pow.f64 M #s(literal 2 binary64)))
#s(approx (* (* M D) (/ (* M D) (* (+ d d) (+ d d)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (pow.f64 d #s(literal 2 binary64)))))
#s(approx (* M D) (*.f64 D M))
#s(approx (/ (* M D) (* (+ d d) (+ d d))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) (pow.f64 d #s(literal 2 binary64)))))
#s(approx (* (* (* M (/ D (+ d d))) (/ h l)) (/ D (+ d d))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 M h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))
#s(approx (neg (* 1/4 (/ (* (pow M 2) h) l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))
#s(approx (* 1/4 (/ (* (pow M 2) h) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))
#s(approx (/ (* (pow M 2) h) l) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))
#s(approx (* (pow M 2) h) (*.f64 (pow.f64 M #s(literal 2 binary64)) h))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (*.f64 (pow.f64 M #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 M #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (/ D (+ d d)) (*.f64 #s(literal 1/2 binary64) (/.f64 D d)))
#s(approx D D)
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (*.f64 (pow.f64 D #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 D #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 M #s(literal 4 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) h)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx h h)
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (/ h (* (* d d) l)) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (/ h l) (/.f64 h l))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (*.f64 h (-.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (*.f64 h (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 #s(literal 1 binary64) h))))
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))))) l))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64))))))))) l))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))) l))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (/.f64 (-.f64 l (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx l l)
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (* (* d d) l) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 d l)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))) l))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))) l))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (+.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 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))))) d))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64))))))))) d))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) d))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))) d))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 (pow.f64 d #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) (/.f64 (-.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (+ d d) (*.f64 #s(literal 2 binary64) d))
#s(approx d d)
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))) d))
#s(approx (* d d) (pow.f64 d #s(literal 2 binary64)))
#s(approx (* (+ d d) (+ d d)) (*.f64 #s(literal 4 binary64) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d)))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))
Calls

18 calls:

TimeVariablePoint
22.0ms
h
0
13.0ms
M
inf
11.0ms
d
0
10.0ms
D
inf
9.0ms
h
-inf

rewrite47.0ms (1.2%)

Memory
-23.1MiB live, 69.9MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
073725
0116701
0439701
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
56 → 213
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M))
(/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l)
(*.f64 h (*.f64 M (/.f64 D (+.f64 d d))))
h
(*.f64 M (/.f64 D (+.f64 d d)))
M
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
l
(*.f64 (/.f64 D (+.f64 d d)) M)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))
#s(literal -1/4 binary64)
(*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 M M)
(/.f64 h (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 M D)
(/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(/.f64 h l)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))
(/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)
(*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)
(*.f64 (pow.f64 M #s(literal 2 binary64)) h)
(pow.f64 M #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
w0
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l)) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d)))) M))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
#s(literal 1 binary64)
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d))) M)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l))
(*.f64 M (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) (*.f64 (/.f64 D (+.f64 d d)) M)) l)
(*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 h l))
(*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (/.f64 h l)))
(*.f64 h (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) l))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)))
(*.f64 (*.f64 h M) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)
(*.f64 h (*.f64 (/.f64 D (+.f64 d d)) M))
h
(*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 D M) (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) M)
(*.f64 M (/.f64 D (+.f64 d d)))
(/.f64 (/.f64 (*.f64 D M) #s(literal 2 binary64)) d)
(/.f64 (neg.f64 (*.f64 D M)) (neg.f64 (+.f64 d d)))
(/.f64 (*.f64 D M) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M)))
M
(*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(/.f64 (neg.f64 D) (neg.f64 (+.f64 d d)))
(/.f64 D (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D))
D
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 d d)) d)
(*.f64 #s(literal 2 binary64) d)
(*.f64 d #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 d d) (*.f64 d d)) (-.f64 d d))
(/.f64 (+.f64 (pow.f64 d #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (fma.f64 d d (-.f64 (*.f64 d d) (*.f64 d d))))
(-.f64 d (neg.f64 d))
(+.f64 d d)
d
l
(*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 D M) (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) M)
(*.f64 M (/.f64 D (+.f64 d d)))
(/.f64 (/.f64 (*.f64 D M) #s(literal 2 binary64)) d)
(/.f64 (neg.f64 (*.f64 D M)) (neg.f64 (+.f64 d d)))
(/.f64 (*.f64 D M) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 D M)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) D)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) D))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) D)
(*.f64 D (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))))
(pow.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M M)) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))
(neg.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/4 binary64)))
#s(literal -1/4 binary64)
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M))
(*.f64 M (*.f64 M (/.f64 h (*.f64 (*.f64 d d) l))))
(/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 M M) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 M M) h)))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(*.f64 h (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(/.f64 (/.f64 h (*.f64 d d)) l)
(/.f64 (neg.f64 h) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 h (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) h))
(*.f64 (*.f64 d d) l)
(*.f64 l (*.f64 d d))
(*.f64 d (*.f64 d l))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))))
(*.f64 (/.f64 h l) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)))
(*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))
(*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l)
(*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M))
(*.f64 (*.f64 D M) (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 M (*.f64 D (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d)))))
(/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 D M)
(*.f64 M D)
(*.f64 (/.f64 M (+.f64 d d)) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 D M) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 M (/.f64 D (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (neg.f64 (*.f64 D M)) (neg.f64 (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 D M)))
(*.f64 (fabs.f64 (+.f64 d d)) (fabs.f64 (+.f64 d d)))
(*.f64 (neg.f64 (+.f64 d d)) (neg.f64 (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(pow.f64 (+.f64 d d) #s(literal 2 binary64))
(fma.f64 (+.f64 d d) d (*.f64 (+.f64 d d) d))
(fma.f64 d (+.f64 d d) (*.f64 d (+.f64 d d)))
(+.f64 (*.f64 (+.f64 d d) d) (*.f64 (+.f64 d d) d))
(+.f64 (*.f64 d (+.f64 d d)) (*.f64 d (+.f64 d d)))
(*.f64 h (/.f64 #s(literal 1 binary64) l))
(/.f64 (neg.f64 h) (neg.f64 l))
(/.f64 h l)
(/.f64 #s(literal 1 binary64) (/.f64 l h))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l)) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d)))) M))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d))) M)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l))
(*.f64 M (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) (*.f64 (/.f64 D (+.f64 d d)) M)) l)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 h l) (/.f64 D (+.f64 d d))))
(*.f64 (/.f64 D (+.f64 d d)) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) D) (+.f64 d d))
(*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 h l))
(*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (/.f64 h l)))
(*.f64 h (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) l))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) (neg.f64 d))
(/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)
(*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l)))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 M M) h) l)))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))
(neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) l) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 M M) h)) l)
#s(literal 1/4 binary64)
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 M M) (/.f64 h l))
(/.f64 (neg.f64 (*.f64 (*.f64 M M) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 M M) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 M M) h)))
(*.f64 (*.f64 M M) h)
(*.f64 h (*.f64 M M))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
#s(literal 2 binary64)

eval45.0ms (1.1%)

Memory
5.5MiB live, 98.8MiB allocated; 11ms collecting garbage
Compiler

Compiled 17 596 to 2 319 computations (86.8% saved)

prune19.0ms (0.5%)

Memory
-7.6MiB live, 38.9MiB allocated; 2ms collecting garbage
Pruning

19 alts after pruning (16 fresh and 3 done)

PrunedKeptTotal
New35214366
Fresh8210
Picked325
Done011
Total36319382
Accuracy
92.6%
Counts
382 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
73.5%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l))) w0)
85.1%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
73.8%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (+.f64 d d))) (/.f64 h l)))) w0)
68.0%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
69.3%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
20.8%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l))) D)) w0)
21.5%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
2.0%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)) w0)
2.5%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d)))) w0)
25.7%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))) w0)
78.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))))
76.3%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))))
81.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* h (* M (/ D (+ d d)))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
25.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) d))))
29.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
1.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d))))
25.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) (/.f64 #s(literal 1 binary64) d)))))
61.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
20.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
Compiler

Compiled 1 362 to 993 computations (27.1% saved)

series208.0ms (5.1%)

Memory
14.0MiB live, 221.0MiB allocated; 97ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08459158
Stop Event
iter-limit
Counts
60 → 181
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l)
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
M
h
l
w0
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))
(/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)
(*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))
(*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))
(*.f64 #s(literal 1/4 binary64) (/.f64 h l))
#s(literal 1/4 binary64)
(/.f64 h l)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 M M) h)
(*.f64 M M)
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))
(*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))
(*.f64 D M)
(*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))
(/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D))
(*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
(*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(literal -1 binary64)
(*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
(*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
(/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx w0 w0)
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (/ (* (* (/ D (+ d d)) M) h) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l))))
#s(approx (* (* (/ D (+ d d)) M) h) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) d)))
#s(approx (* (/ D (+ d d)) M) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D M) d)))
#s(approx M M)
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))
#s(approx (* (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) D) (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* -1/4 (/ (* (* M M) h) (* (* d d) l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (/ (* (* M M) h) (* (* d d) l)) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (* (* M M) h) (*.f64 (pow.f64 M #s(literal 2 binary64)) h))
#s(approx (* M M) (pow.f64 M #s(literal 2 binary64)))
#s(approx (* D M) (*.f64 D M))
#s(approx (* (/ (* D M) (* (+ d d) (+ d d))) (/ h l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (/ (* D M) (* (+ d d) (+ d d))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 D M) (pow.f64 d #s(literal 2 binary64)))))
#s(approx (* -1 (* M (sqrt (* -1/4 (/ h (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (*.f64 (pow.f64 M #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 M #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 M (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (* (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) D) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 (pow.f64 D #s(literal 2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (/ D (+ d d)) (*.f64 #s(literal 1/2 binary64) (/.f64 D d)))
#s(approx D D)
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))))
#s(approx (* (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) D) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (*.f64 (pow.f64 D #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 D #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 D (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 D (-.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))) #s(literal 3 binary64)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) w0)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) h)) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 h (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (pow.f64 M #s(literal 4 binary64))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) h)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))))
#s(approx h h)
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))
#s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))
#s(approx (sqrt (neg (* 1/4 (/ h l)))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))
#s(approx (neg (* 1/4 (/ h l))) (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))
#s(approx (* 1/4 (/ h l)) (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))
#s(approx (/ h l) (/.f64 h l))
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
#s(approx (* -1/4 (/ h (* (pow d 2) l))) (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
#s(approx (/ h (* (pow d 2) l)) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (*.f64 h (-.f64 (/.f64 #s(literal 1 binary64) h) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))))
#s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (*.f64 M (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l))))))
#s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* -1 (* M (sqrt (* -1/4 (/ h (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (*.f64 M (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 h (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (*.f64 #s(literal -1 binary64) (*.f64 h (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))) (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 5 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))) #s(literal 3 binary64)))))))))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (*.f64 h (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (pow.f64 M #s(literal 2 binary64))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (/.f64 #s(literal 1 binary64) h))))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l))))))
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))))) l))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (fma.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64))))))))) l))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))) l))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))) (pow.f64 d #s(literal 2 binary64)))))))))) l))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (/.f64 (-.f64 l (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx l l)
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (/ (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) d) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 d l)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))) l))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))) l))
#s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l))
#s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l))) l))
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (* (* d d) l) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
#s(approx (* -1 (* M (sqrt (* -1/4 (/ h (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h l) (pow.f64 d #s(literal 2 binary64)))))) l)))
#s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h l) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h l) (pow.f64 d #s(literal 2 binary64))))) l))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (pow.f64 l #s(literal 3 binary64)))))))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (+.f64 w0 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 2 binary64)) w0))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 3 binary64)) w0))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h w0))) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (*.f64 (pow.f64 d #s(literal 4 binary64)) l)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (+.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 (*.f64 (pow.f64 D #s(literal 4 binary64)) (*.f64 (pow.f64 M #s(literal 4 binary64)) (pow.f64 h #s(literal 2 binary64)))) (pow.f64 d #s(literal 4 binary64))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (pow.f64 M #s(literal 6 binary64)) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (pow.f64 d #s(literal 6 binary64)) l)))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) (pow.f64 d #s(literal 2 binary64))))) l))))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))))) d))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (fma.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 w0 (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 2 binary64)) w0) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64))))))))) d))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) d))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))) d))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) (/.f64 (+.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) (*.f64 (pow.f64 d #s(literal 2 binary64)) (fma.f64 (pow.f64 d #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 d #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))))))) d))
#s(approx (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M))) (/.f64 (-.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))) (pow.f64 d #s(literal 2 binary64))))
#s(approx (+ d d) (*.f64 #s(literal 2 binary64) d))
#s(approx d d)
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))) d))
#s(approx (* d d) (pow.f64 d #s(literal 2 binary64)))
#s(approx (* (+ d d) (+ d d)) (*.f64 #s(literal 4 binary64) (pow.f64 d #s(literal 2 binary64))))
#s(approx (* -1 (* M (sqrt (* -1/4 (/ h (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))
#s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d))
#s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))
#s(approx (* (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) D) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d)))
#s(approx (sqrt (* -1/4 (/ (* (* M M) h) (* (* d d) l)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))) d)))
#s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d)))
Calls

18 calls:

TimeVariablePoint
60.0ms
h
inf
13.0ms
d
0
11.0ms
M
-inf
8.0ms
M
inf
8.0ms
h
-inf

rewrite46.0ms (1.1%)

Memory
1.7MiB live, 47.0MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
088874
0131837
0461837
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
60 → 194
Calls
Call 1
Inputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M))
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l)
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
M
h
l
w0
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))
(/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)
(*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))
(*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))
(*.f64 #s(literal 1/4 binary64) (/.f64 h l))
#s(literal 1/4 binary64)
(/.f64 h l)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 M M) h)
(*.f64 M M)
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))
(*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))
(*.f64 D M)
(*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))
(/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D))
(*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
(*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(literal -1 binary64)
(*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))
(*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
(/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))))) w0)
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d))))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d))))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d))))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d)))))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l)) (*.f64 M (/.f64 D (+.f64 d d)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d))))))
#s(literal 1 binary64)
(*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (/.f64 D (+.f64 d d))) M)
(*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l))
(/.f64 (*.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 M (/.f64 D (+.f64 d d)))) l)
(*.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))
(/.f64 (neg.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d))))) (neg.f64 l))
(/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 h (*.f64 M (/.f64 D (+.f64 d d))))))
(*.f64 h (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) h)
(*.f64 (/.f64 D (+.f64 d d)) (*.f64 M h))
(*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(*.f64 M (/.f64 D (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 (/.f64 (*.f64 M D) #s(literal 2 binary64)) d)
(/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (+.f64 d d)))
(/.f64 (*.f64 M D) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 M D)))
(*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(/.f64 (neg.f64 D) (neg.f64 (+.f64 d d)))
(/.f64 D (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D))
D
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 d d)) d)
(*.f64 #s(literal 2 binary64) d)
(*.f64 d #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 d d) (*.f64 d d)) (-.f64 d d))
(/.f64 (+.f64 (pow.f64 d #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (fma.f64 d d (-.f64 (*.f64 d d) (*.f64 d d))))
(-.f64 d (neg.f64 d))
(+.f64 d d)
d
M
h
l
w0
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d)))
#s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))
(*.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) (/.f64 #s(literal 1 binary64) d))
(*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d))
(/.f64 (neg.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) (neg.f64 d))
(/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)))
(*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)
(*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)
(*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))
(*.f64 #s(literal -1/4 binary64) (/.f64 h l))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 h l)))
(neg.f64 (*.f64 (/.f64 h l) #s(literal 1/4 binary64)))
(*.f64 (/.f64 h l) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (/.f64 h l))
(/.f64 (*.f64 #s(literal 1/4 binary64) h) l)
#s(literal 1/4 binary64)
(*.f64 h (/.f64 #s(literal 1 binary64) l))
(/.f64 (neg.f64 h) (neg.f64 l))
(/.f64 h l)
(/.f64 #s(literal 1 binary64) (/.f64 l h))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))) D)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))) D))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))) D)
(*.f64 D (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M))))
(pow.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M M)) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal -1/4 binary64))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M))))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) l))
(neg.f64 (*.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M)) #s(literal 1/4 binary64)))
#s(literal -1/4 binary64)
(*.f64 (/.f64 (*.f64 M M) (*.f64 d d)) (/.f64 h l))
(*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 M M))
(*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 M (*.f64 M (/.f64 h (*.f64 (*.f64 d d) l))))
(/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 M M) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 M M) h)))
(*.f64 (*.f64 M M) h)
(*.f64 h (*.f64 M M))
(*.f64 M (*.f64 M h))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(*.f64 (*.f64 d d) l)
(*.f64 l (*.f64 d d))
(*.f64 d (*.f64 d l))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 M D)) (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l))))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D))))
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l))
(*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D))
(*.f64 (*.f64 M D) (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)))
(*.f64 D (*.f64 M (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l))))
(*.f64 M D)
(*.f64 D M)
(*.f64 (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))
(*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(/.f64 (*.f64 (*.f64 M D) (/.f64 h l)) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (/.f64 D (+.f64 d d)) (/.f64 M (+.f64 d d)))
(*.f64 D (/.f64 M (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 M (/.f64 D (+.f64 d d))) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 M D)))
(*.f64 (fabs.f64 (+.f64 d d)) (fabs.f64 (+.f64 d d)))
(*.f64 (neg.f64 (+.f64 d d)) (neg.f64 (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(pow.f64 (+.f64 d d) #s(literal 2 binary64))
(fma.f64 (+.f64 d d) d (*.f64 (+.f64 d d) d))
(fma.f64 d (+.f64 d d) (*.f64 d (+.f64 d d)))
(+.f64 (*.f64 (+.f64 d d) d) (*.f64 (+.f64 d d) d))
(+.f64 (*.f64 d (+.f64 d d)) (*.f64 d (+.f64 d d)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))) D)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))) D))
(*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))) D)
(*.f64 D #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))))
#s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M)))
(*.f64 (*.f64 #s(literal -1 binary64) M) (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))
#s(literal -1 binary64)
(*.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M)
(*.f64 M (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 h (*.f64 (*.f64 d d) l))))
(pow.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))))
(*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))
(*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 #s(literal -1/4 binary64) h) (*.f64 (*.f64 d d) l))
(*.f64 h (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(/.f64 (/.f64 h (*.f64 d d)) l)
(/.f64 (neg.f64 h) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 h (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) h))
(*.f64 (*.f64 d d) l)
(*.f64 l (*.f64 d d))
(*.f64 d (*.f64 d l))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
#s(literal 2 binary64)

eval54.0ms (1.3%)

Memory
-6.4MiB live, 89.1MiB allocated; 18ms collecting garbage
Compiler

Compiled 19 557 to 2 403 computations (87.7% saved)

prune18.0ms (0.5%)

Memory
-10.9MiB live, 36.1MiB allocated; 2ms collecting garbage
Pruning

15 alts after pruning (14 fresh and 1 done)

PrunedKeptTotal
New36212374
Fresh9211
Picked505
Done213
Total37815393
Accuracy
94.8%
Counts
393 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
85.8%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) h) l) (/.f64 (*.f64 M D) (+.f64 d d))))) w0)
83.7%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M h)) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
72.5%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))) w0)
81.2%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* (* (/ D (+ d d)) M) h) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
1.6%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d))))) D)) w0)
31.4%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d)))))) D)) w0)
1.6%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) #s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))) D)) w0)
29.1%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
25.7%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))) w0)
13.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
14.8%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))) d))))
25.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) (/.f64 #s(literal 1 binary64) d)))))
31.7%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
61.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
20.3%
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
Compiler

Compiled 723 to 503 computations (30.4% saved)

regimes376.0ms (9.3%)

Memory
13.6MiB live, 394.1MiB allocated; 39ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
2 → 2
29 → 2
31 → 2
53 → 2
Calls
Call 1
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Outputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 2
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
Outputs
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 3
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) #s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d))))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d)))))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) (/.f64 #s(literal 1 binary64) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h) (*.f64 (+.f64 d d) (+.f64 d d))) l))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* (* (/ D (+ d d)) M) h) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* h (* M (/ D (+ d d)))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (+.f64 d d))) (/.f64 h l)))) w0)
Outputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Call 4
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) #s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d))))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d)))))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) (/.f64 #s(literal 1 binary64) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h) (*.f64 (+.f64 d d) (+.f64 d d))) l))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* (* (/ D (+ d d)) M) h) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* h (* M (/ D (+ d d)))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M h)) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
Outputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
Call 5
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D) d))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) #s(approx (* M (sqrt (* -1/4 (/ h (* (pow d 2) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))) d)))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d))))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l)))))))) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) d))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M #s(approx (sqrt (* -1/4 (/ h (* (pow d 2) l)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) d)))))) D)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l))) D)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D) (/.f64 #s(literal 1 binary64) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 d d)) l)))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)) (*.f64 M D)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h) (*.f64 (+.f64 d d) (+.f64 d d))) l))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* (* (/ D (+ d d)) M) h) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* h (* M (/ D (+ d d)))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 D (+.f64 d d)) (*.f64 M h)) l) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) h) l) (/.f64 (*.f64 M D) (+.f64 d d))))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M M) (*.f64 (/.f64 D (+.f64 d d)) (/.f64 D (+.f64 d d)))) (/.f64 h l)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (+.f64 d d)) #s(literal 2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) D) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d)))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))) d)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* (sqrt (- 1 (* (/ (* (* (/ D (+ d d)) M) h) l) (* (/ D (+ d d)) M)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l)))) d)))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
Outputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l)))))) (*.f64 D (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) d)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) h) l) (/.f64 (*.f64 M D) (+.f64 d d))))) w0)
Calls

49 calls:

87.0ms
(*.f64 #s(literal 2 binary64) d)
21.0ms
(*.f64 #s(literal 2 binary64) d)
21.0ms
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
16.0ms
l
15.0ms
M
Results
AccuracySegmentsBranch
61.9%1h
61.9%1w0
61.9%1(*.f64 #s(literal 2 binary64) d)
61.9%1d
61.9%1D
61.9%1(/.f64 h l)
61.9%1M
61.9%1(*.f64 M D)
61.9%1(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
61.9%1(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
61.9%1(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
61.9%1(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
61.9%1(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
61.9%1(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
66.7%2(*.f64 #s(literal 2 binary64) d)
66.7%2d
68.2%2(/.f64 h l)
63.7%2w0
67.0%2D
61.9%1l
61.9%1h
81.5%3(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
74.0%2(*.f64 M D)
78.2%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
72.2%2M
78.2%2(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
87.2%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
87.2%3(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
87.2%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
91.1%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
91.1%3(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
89.6%3(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
89.8%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
91.0%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
85.8%1(/.f64 h l)
85.8%1(*.f64 #s(literal 2 binary64) d)
88.1%2(*.f64 M D)
89.2%2(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
88.1%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
91.8%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
92.2%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
92.2%3(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
92.2%3(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
85.8%1w0
88.1%2M
85.8%1D
85.8%1h
85.8%1l
85.8%1d
Compiler

Compiled 2 439 to 918 computations (62.4% saved)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-6.581120273364948e+65
-2.3287756505857107e+59
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-6.581120273364948e+65
-2.3287756505857107e+59
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-33297520.359251436
-0.04380466647285175
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-33297520.359251436
-0.04380466647285175
Compiler

Compiled 21 to 26 computations (-23.8% saved)

derivations32.0ms (0.8%)

Memory
-27.5MiB live, 19.0MiB allocated; 3ms collecting garbage
Stop Event
fuel
Compiler

Compiled 416 to 79 computations (81% saved)

preprocess222.0ms (5.5%)

Memory
42.1MiB live, 373.3MiB allocated; 50ms collecting garbage
Remove

(sort M D)

(negabs w0)

(abs d)

(abs D)

(abs M)

Compiler

Compiled 7 568 to 4 230 computations (44.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...