Henrywood and Agarwal, Equation (9a)

Time bar (total: 4.7s)

start0.0ms (0%)

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

analyze695.0ms (14.7%)

Memory
-13.5MiB live, 975.6MiB allocated; 446ms 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.5s (31.4%)

Memory
8.2MiB live, 3 477.9MiB allocated; 381ms collecting garbage
Samples
724.0ms8 256×0valid
242.0ms2 718×0invalid
Precisions
Click to see histograms. Total time spent on operations: 566.0ms
ival-mult!: 213.0ms (37.7% of total)
ival-div!: 125.0ms (22.1% of total)
ival-pow2: 123.0ms (21.7% of total)
ival-sqrt: 75.0ms (13.3% of total)
ival-sub!: 29.0ms (5.1% of total)
adjust: 2.0ms (0.4% of total)
Bogosity

preprocess47.0ms (1%)

Memory
0.5MiB live, 50.3MiB allocated; 3ms 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
79.4%
(*.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)

series129.0ms (2.7%)

Memory
3.2MiB live, 195.3MiB allocated; 51ms 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
38.0ms
d
-inf
6.0ms
D
-inf
6.0ms
M
0
5.0ms
d
0
5.0ms
h
inf

rewrite47.0ms (1%)

Memory
26.7MiB live, 73.4MiB allocated; 2ms 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

eval40.0ms (0.8%)

Memory
-6.8MiB live, 88.2MiB allocated; 9ms collecting garbage
Compiler

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

prune14.0ms (0.3%)

Memory
-13.0MiB live, 34.1MiB allocated; 1ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New27512287
Fresh000
Picked101
Done000
Total27612288
Accuracy
91.0%
Counts
288 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
67.7%
(*.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)
52.8%
(*.f64 w0 (sqrt.f64 (/.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)))))
74.1%
(*.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))))
78.4%
(*.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)))))
6.0%
(*.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 (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)))
54.4%
(*.f64 w0 #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))))))
14.7%
(*.f64 w0 #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))))))))
16.3%
(*.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.2%
(*.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)))))))))
68.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
16.2%
#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 804 to 600 computations (25.4% saved)

series142.0ms (3%)

Memory
16.9MiB live, 297.0MiB allocated; 19ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07748726
Stop Event
iter-limit
Counts
51 → 157
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 #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 (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 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))))))
(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)))))
(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/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#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 (pow.f64 D #s(literal 2 binary64)) h)
(pow.f64 D #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
(*.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)))))))))
#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 #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(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))))))
(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)))
(/.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))
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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) 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 (* -1 (* 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) (* (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 (+.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 (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 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 D (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 D 2) h) (* (pow d 2) l)))) (*.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 (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))) (*.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 (/ (* (pow D 2) h) (* (pow d 2) l)) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (* (pow D 2) h) (*.f64 (pow.f64 D #s(literal 2 binary64)) h))
#s(approx (pow D 2) (pow.f64 D #s(literal 2 binary64)))
#s(approx (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) 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 (* 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 (+.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 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (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 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 M (sqrt.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 (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (sqrt.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 (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))))) (*.f64 #s(literal -1 binary64) (*.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 (*.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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) 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 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* -1 (* 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) (* (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) 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 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) 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 (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #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 (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))))) (*.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)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) 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 (* 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d))
#s(approx (pow d 2) (pow.f64 d #s(literal 2 binary64)))
#s(approx (* -1 (* 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 (* 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 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 D #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
14.0ms
M
0
10.0ms
h
0
8.0ms
D
0
8.0ms
d
inf
7.0ms
d
0

rewrite42.0ms (0.9%)

Memory
19.3MiB live, 68.4MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059625
097547
0365547
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
51 → 180
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 #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 (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 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))))))
(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)))))
(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/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#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 (pow.f64 D #s(literal 2 binary64)) h)
(pow.f64 D #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (pow.f64 d #s(literal 2 binary64)) l)
(pow.f64 d #s(literal 2 binary64))
(*.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)))))))))
#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 #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(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))))))
(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)))
(/.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))
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 (fabs.f64 (*.f64 M D)) (fabs.f64 (*.f64 M D)))
(*.f64 (neg.f64 (*.f64 M D)) (neg.f64 (*.f64 M D)))
(*.f64 (*.f64 D D) (*.f64 M M))
(*.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 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) 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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)
(*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(neg.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 d d) l))
#s(literal 1/4 binary64)
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 D D) h)))
(*.f64 (*.f64 D D) h)
(*.f64 h (*.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)))
#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)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.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)))) (neg.f64 (*.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)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)))
(*.f64 (*.f64 #s(literal -1 binary64) D) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))
#s(literal -1 binary64)
(*.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))
(*.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)))

eval40.0ms (0.8%)

Memory
-3.1MiB live, 88.4MiB allocated; 5ms collecting garbage
Compiler

Compiled 15 695 to 2 075 computations (86.8% saved)

prune21.0ms (0.4%)

Memory
4.3MiB live, 50.8MiB allocated; 3ms collecting garbage
Pruning

20 alts after pruning (19 fresh and 1 done)

PrunedKeptTotal
New30917326
Fresh527
Picked415
Done000
Total31820338
Accuracy
92.9%
Counts
338 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
71.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)
15.2%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) w0)
2.2%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))) w0)
52.8%
(*.f64 w0 (sqrt.f64 (/.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)))))
69.5%
(*.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.4%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
77.7%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
80.5%
(*.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.1%
(*.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.1%
(*.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)))))
15.5%
(*.f64 w0 #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 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)))))))
20.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
1.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
2.6%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 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))))))
6.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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)))))))))))
1.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.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)))))))))))
21.6%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.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))))))))))))
1.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))))
68.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
16.2%
#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 502 to 1 103 computations (26.6% saved)

series169.0ms (3.6%)

Memory
2.6MiB live, 336.3MiB allocated; 33ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07998780
Stop Event
iter-limit
Counts
58 → 162
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))
#s(literal 1 binary64)
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l)
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h)
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 M (/.f64 D (+.f64 d d)))
M
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))
#s(literal -1/4 binary64)
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 D D)
(/.f64 h (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.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 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l)
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)
(*.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 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))))))
(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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d)))
(*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d)))
(/.f64 h l)
(/.f64 (*.f64 M D) (+.f64 d d))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d))
#s(literal -1 binary64)
(/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)
(*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)
(*.f64 (pow.f64 D #s(literal 2 binary64)) h)
(pow.f64 D #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) h) l))) #s(literal 1 binary64))
#s(approx (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (* (* (* M (/ D (+ d d))) (* M (/ 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 (* (* M (/ D (+ d d))) (* M (/ 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 (+ d d))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D M) d)))
#s(approx M M)
#s(approx (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.f64 M (sqrt.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 (* 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 (* (/ h l) (/ (* M D) (+ d d))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) 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 (* -1 (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))
#s(approx (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow 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) l))))))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 d)) (*.f64 #s(literal 1/2 binary64) (/.f64 D d)))
#s(approx D D)
#s(approx (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.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 (* (* D D) (/ h (* (* d d) l))))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))
#s(approx (* -1/4 (* (* D D) (/ h (* (* d d) l)))) (*.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 (* (* D D) (/ h (* (* d d) l))) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (* D D) (pow.f64 D #s(literal 2 binary64)))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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 (* -1 (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 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 (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 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 D 2) h) l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))
#s(approx (neg (* 1/4 (/ (* (pow D 2) h) l))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))
#s(approx (* 1/4 (/ (* (pow D 2) h) l)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))
#s(approx (/ (* (pow D 2) h) l) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))
#s(approx (* (pow D 2) h) (*.f64 (pow.f64 D #s(literal 2 binary64)) h))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.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 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 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 D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 h)
#s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (sqrt.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 (/ h (* (* d d) l)) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))
#s(approx (/ h l) (/.f64 h l))
#s(approx (* -1 (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d)))
#s(approx (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))) d))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.f64 M (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))
#s(approx (* -1 (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)))))) d)))
#s(approx (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d) (/.f64 (*.f64 M (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)))))) d))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) 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 (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 h (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l))))))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.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 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))
#s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) 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 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l))))))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) 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 (sqrt (neg (* 1/4 (/ (* (pow D 2) h) 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 (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)) (pow.f64 d #s(literal 2 binary64)))))) l))
#s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #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 (neg (* 1/4 (/ (* (pow D 2) h) l))))) d)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 d l))))
#s(approx (/ (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) d) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l))))) (*.f64 d l)))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l))))) l))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 h l)))) l))
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 (+ d d) (*.f64 #s(literal 2 binary64) d))
#s(approx d d)
#s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #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 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))) d)))
Calls

18 calls:

TimeVariablePoint
22.0ms
M
inf
11.0ms
w0
0
9.0ms
l
0
9.0ms
d
inf
9.0ms
D
0

rewrite50.0ms (1.1%)

Memory
-19.3MiB live, 76.0MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075761
0119670
0457670
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
58 → 226
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))
#s(literal 1 binary64)
(/.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l)
(*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h)
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 M (/.f64 D (+.f64 d d)))
M
(/.f64 D (+.f64 d d))
D
(+.f64 d d)
d
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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))
#s(literal -1/4 binary64)
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 D D)
(/.f64 h (*.f64 (*.f64 d d) l))
(*.f64 (*.f64 d d) l)
(*.f64 d d)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.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 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))
(/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l)
(*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h)
(*.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 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))))))
(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 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))
(*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d)))
(*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d)))
(/.f64 h l)
(/.f64 (*.f64 M D) (+.f64 d d))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d))
#s(literal -1 binary64)
(/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) d)
(*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))))
(sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l)
(*.f64 (pow.f64 D #s(literal 2 binary64)) h)
(pow.f64 D #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
w0
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d)))) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))
#s(literal 1 binary64)
(*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (/.f64 h l) (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))))
(*.f64 (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))))
(/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)))
(*.f64 h (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))))
(*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h))
(*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) M) (/.f64 D (+.f64 d d)))
(*.f64 (*.f64 M M) (*.f64 (/.f64 D (+.f64 d d)) (/.f64 D (+.f64 d d))))
(*.f64 (pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 1 binary64)))
(*.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 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M)))
(pow.f64 (*.f64 (/.f64 D (+.f64 d d)) M) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 2 binary64)))
(*.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
h
l
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) M)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) M))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))) M)
(*.f64 M (sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(pow.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D D)) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal -1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))))
(neg.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l))) #s(literal 1/4 binary64)))
#s(literal -1/4 binary64)
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(*.f64 (/.f64 h (*.f64 (*.f64 d d) l)) (*.f64 D D))
(*.f64 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l))))
(/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 D D) h)))
(*.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 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 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) 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)) (*.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) (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) (/.f64 h l))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h)))
(*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h)
(*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) h))
(*.f64 h (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)))
(*.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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d)))) (*.f64 (/.f64 D (+.f64 d d)) M)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))))
(*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (/.f64 h l) (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))))
(*.f64 (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) (/.f64 h l))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))))
(/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)))
(*.f64 (/.f64 h l) (*.f64 (/.f64 D (+.f64 d d)) M))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 h l))
(/.f64 (*.f64 (/.f64 h l) (*.f64 D M)) (+.f64 d d))
(/.f64 (*.f64 h (*.f64 (/.f64 D (+.f64 d d)) M)) l)
(/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.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 (/.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)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))
(*.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d)
(neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)))
#s(literal -1 binary64)
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) (neg.f64 d))
(/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)
(*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l)))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 D D) h) l)))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))
(neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) h)) l)
#s(literal 1/4 binary64)
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 D D) (/.f64 h l))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 D D) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 D D) h)))
(*.f64 (*.f64 D D) h)
(*.f64 h (*.f64 D D))
(*.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)

eval47.0ms (1%)

Memory
27.1MiB live, 107.4MiB allocated; 11ms collecting garbage
Compiler

Compiled 17 956 to 2 378 computations (86.8% saved)

prune410.0ms (8.7%)

Memory
-89.3MiB live, 53.5MiB allocated; 887ms collecting garbage
Pruning

20 alts after pruning (19 fresh and 1 done)

PrunedKeptTotal
New35216368
Fresh11314
Picked505
Done011
Total36820388
Accuracy
95.3%
Counts
388 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
81.2%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
71.0%
(*.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)
15.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 (*.f64 D D) h) (*.f64 d d)) l))) M)) w0)
15.6%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) w0)
1.9%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) M)) w0)
2.2%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))) w0)
1.9%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.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))))))))) w0)
1.3%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
83.2%
(*.f64 w0 (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l)))
52.8%
(*.f64 w0 (sqrt.f64 (/.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)))))
84.3%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
86.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))))
2.6%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 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))))))
1.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d))))
1.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)))))
24.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d)))))
1.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)))))
24.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) d)))))
68.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
16.2%
#s(approx (* w0 (sqrt (- 1 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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 704 to 1 203 computations (29.4% saved)

series263.0ms (5.6%)

Memory
-25.6MiB live, 373.9MiB allocated; 115ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePoint
51.0ms
h
0
20.0ms
M
inf
18.0ms
D
inf
17.0ms
D
0
16.0ms
l
0

rewrite56.0ms (1.2%)

Memory
0.4MiB live, 48.4MiB allocated; 13ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
081945
0124833
0475833
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
59 → 214
Calls
Call 1
Inputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))))
w0
(sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l)))
(-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))
#s(literal 1 binary64)
(/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l)
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.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
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)
h
l
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))
(neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)))
(*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))
(/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l)))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (*.f64 D D) h) l)
(*.f64 (*.f64 D D) h)
(*.f64 D 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 (*.f64 (*.f64 D D) h) (*.f64 d d)) l))) M)) 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 (*.f64 D D) h) (*.f64 d d)) l))) M))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l))) M)
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)))
(*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l))
(/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)
(/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d))
(*.f64 d d)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d))
#s(literal -1 binary64)
(/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))) d)
(*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))
(*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))
(*.f64 D (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 w0 (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l)))
(sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l)
(-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h))
(*.f64 #s(literal 1 binary64) l)
(*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)
(*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M)))
(*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))
Outputs
(*.f64 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.f64 w0 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)))
w0
(pow.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (sqrt.f64 l))
(sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l))
(fabs.f64 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) (/.f64 #s(literal 1 binary64) l))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))))))
(/.f64 (neg.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (neg.f64 l))
(/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) #s(literal 1 binary64)))
(-.f64 (/.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M)) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))))
#s(literal 1 binary64)
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)
(*.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 h (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))))
(*.f64 M (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) h))
(*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 h (*.f64 M (/.f64 D (+.f64 d d))))))
(*.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 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))
h
l
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 (neg.f64 M) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d)))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 (neg.f64 M) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d)))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 (neg.f64 M) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 (neg.f64 M) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d)))
(*.f64 (neg.f64 M) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d))
(*.f64 M (neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d)))
(neg.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d) M))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d) M)
(*.f64 M (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d))
(/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) d)
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) d))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) (neg.f64 d))
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 (*.f64 (*.f64 D D) h) l)))
(pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 D D) h) l)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) l)
(neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal 1/4 binary64)))
#s(literal -1/4 binary64)
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 D D) (/.f64 h l))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 l))
(/.f64 (*.f64 (*.f64 D D) h) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 D D) h)))
(*.f64 (*.f64 D D) h)
(*.f64 h (*.f64 D D))
(*.f64 D (*.f64 D h))
(*.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 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M))
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))) M)
(*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))))
(*.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l))))
(pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64)))
(fabs.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)))
(*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal -1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l))))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d)))) l)
(neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 d d)) (/.f64 h l))
(*.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 d d) l)))
(*.f64 (*.f64 D D) (/.f64 h (*.f64 (*.f64 d d) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d)))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 (*.f64 (*.f64 d d) l)))
(/.f64 (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) l)
(/.f64 (*.f64 (*.f64 D D) h) (*.f64 (*.f64 d d) l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 d d) l) (*.f64 (*.f64 D D) h)))
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d)))))
(*.f64 (/.f64 (*.f64 D D) d) (/.f64 h d))
(*.f64 (*.f64 (*.f64 D D) h) (/.f64 #s(literal 1 binary64) (*.f64 d d)))
(*.f64 (*.f64 D D) (/.f64 h (*.f64 d d)))
(/.f64 (/.f64 (*.f64 (*.f64 D D) h) d) d)
(/.f64 (neg.f64 (*.f64 (*.f64 D D) h)) (neg.f64 (*.f64 d d)))
(/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)))
(*.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 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d))))
#s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))
(*.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M)) d)
(neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d))
#s(literal -1 binary64)
(*.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) (/.f64 #s(literal 1 binary64) d))
(*.f64 M (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) d))
(/.f64 (neg.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M)) (neg.f64 d))
(/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M)))
(*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M)
(*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))))
#s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D)))
(*.f64 (*.f64 #s(literal -1 binary64) D) (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D)
(*.f64 D (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 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.f64 w0 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)))
(pow.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (sqrt.f64 l))
(sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l))
(fabs.f64 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) (/.f64 #s(literal 1 binary64) l))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))))))
(/.f64 (neg.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (neg.f64 l))
(/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)) #s(literal 1 binary64)))
(-.f64 (/.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M)) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) (/.f64 h l))))
(*.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l) l)
(/.f64 (-.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (+.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)))
(/.f64 (-.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) #s(literal 3 binary64))) (fma.f64 l l (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) (*.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h) l))
(-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))
(+.f64 l (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M)) h))
(+.f64 l (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)))
l
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)
(*.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 h (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))))
(*.f64 M (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) h))
(*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (*.f64 h (*.f64 M (/.f64 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 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 M (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))))
(pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 D (+.f64 d d)) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) (*.f64 M (/.f64 D (+.f64 d d))))
(/.f64 (*.f64 D (*.f64 M (/.f64 D (+.f64 d d)))) (+.f64 d d))

eval53.0ms (1.1%)

Memory
-6.6MiB live, 84.9MiB allocated; 9ms collecting garbage
Compiler

Compiled 24 747 to 2 910 computations (88.2% saved)

prune23.0ms (0.5%)

Memory
-6.6MiB live, 40.2MiB allocated; 2ms collecting garbage
Pruning

24 alts after pruning (21 fresh and 3 done)

PrunedKeptTotal
New43312445
Fresh5914
Picked325
Done011
Total44124465
Accuracy
95.6%
Counts
465 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
83.2%
(*.f64 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
81.2%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
71.0%
(*.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)
15.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 (*.f64 D D) h) (*.f64 d d)) l))) M)) w0)
15.6%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) w0)
2.2%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))) w0)
24.1%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
1.3%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) d)))) w0)
1.3%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 D (*.f64 D h)) l))) d))))) w0)
1.4%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
22.3%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))) d))))) w0)
1.4%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
43.3%
(*.f64 w0 (/.f64 (sqrt.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (sqrt.f64 l)))
52.8%
(*.f64 w0 (sqrt.f64 (/.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)))))
84.3%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
88.4%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) h)) l))))
86.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))))
2.6%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 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))))))
1.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))) d)))))
11.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l))) l)))))) d)))))
14.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ h l)))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 h l))))))))) d)))))
10.6%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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)))))))))) d)))))
24.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) d)))))
68.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Compiler

Compiled 1 109 to 772 computations (30.4% saved)

regimes660.0ms (14%)

Memory
40.4MiB live, 842.1MiB allocated; 260ms collecting garbage
Accuracy

Total -42.7b remaining (-80.9%)

Threshold costs -42.7b (-80.9%)

Counts
3 → 1
15 → 2
33 → 2
35 → 3
36 → 3
58 → 2
Calls
Call 1
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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 D (*.f64 D h)) l))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) 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 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) 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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) 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 D D) h) (*.f64 d d)) l))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D))) w0)
Outputs
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 D (*.f64 D h)) l))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) 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 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) 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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) 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 D D) h) (*.f64 d d)) l))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.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)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.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)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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)))))))))) 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 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) 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 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.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 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 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.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)))))
Outputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 D (*.f64 D h)) l))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) 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 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) 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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) 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 D D) h) (*.f64 d d)) l))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.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)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.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)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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)))))))))) 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 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) 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 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.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 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 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.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 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
Outputs
(*.f64 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.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 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) 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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 D (*.f64 D h)) l))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) 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 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) 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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) 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 D D) h) (*.f64 d d)) l))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.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)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.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)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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)))))))))) 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 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) 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 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.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 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 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.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 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))))
Outputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))))
(*.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 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
Call 6
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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 #s(approx (* M (/ (sqrt (* -1/4 (/ (* (* D D) h) l))) d)) (/.f64 (*.f64 D (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 #s(approx (sqrt (* -1/4 (/ (* (* D D) h) l))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l)))))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 D (*.f64 D h)) l))) d))))) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (*.f64 M (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) d))))) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l))))) (*.f64 D (*.f64 M (sqrt.f64 (neg.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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 M (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 D D) h) l) #s(literal -1/4 binary64)))) 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 D (*.f64 D (/.f64 h (*.f64 (*.f64 d d) l)))))) M)) 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 D D) (/.f64 h (*.f64 (*.f64 d d) l))))) M)) 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 D D) h) (*.f64 d d)) l))) M)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) h) l))) M)) d))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (neg.f64 (*.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)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 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)))))))) d)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.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)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 (*.f64 D D) h) (*.f64 d d)) l)))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ h l)))) (/.f64 (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 D #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)))))))))) 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 (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 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) 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 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 h (*.f64 D M)) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.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 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 (sqrt.f64 (/.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h)) l)) w0)
(*.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 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d)))) h) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) h)) l))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) h)) l))))
(*.f64 w0 (/.f64 (sqrt.f64 (-.f64 l (*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 D (+.f64 d d))) M) h))) (sqrt.f64 l)))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
(*.f64 w0 (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 M (*.f64 (/.f64 D (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M))) h)) l)))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) M)) w0)
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* (sqrt (* -1/4 (* (* D D) (/ h (* (* d d) l))))) M) (*.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))))))))) 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 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.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)))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 D (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 (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #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 #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))))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.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)))) (*.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 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 (* 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 (/ (* (* (* M (/ D (+ d d))) (* M (/ D (+ d d)))) 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))
(*.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 #s(literal -1 binary64) (*.f64 D #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)))))))))))
(*.f64 w0 #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))))))
(*.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 (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)))
(*.f64 w0 (sqrt.f64 (/.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)))))
Outputs
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) (*.f64 (/.f64 (*.f64 M D) (+.f64 d d)) h)) l))))
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ (* (pow D 2) h) (* (pow d 2) l)))))) (neg.f64 (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) h) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) D))) M) d)))) w0)
Calls

60 calls:

64.0ms
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
25.0ms
d
25.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)))))
23.0ms
(/.f64 h l)
20.0ms
M
Results
AccuracySegmentsBranch
68.1%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)))))
68.1%1(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
68.1%1(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
68.1%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)))
68.1%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))))
68.1%1w0
68.1%1D
68.1%1(*.f64 M D)
68.1%1M
68.1%1h
68.1%1l
68.1%1(/.f64 h l)
68.1%1(*.f64 #s(literal 2 binary64) d)
68.1%1d
68.1%1(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
83.4%2(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
83.4%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
88.3%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)))
88.3%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))))
84.0%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)))))
88.3%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
88.7%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
90.0%3(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
90.0%3(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
88.7%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
90.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)))
90.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))))
90.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)))))
90.4%3(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
90.4%3(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
89.4%3(/.f64 h l)
88.1%2(*.f64 #s(literal 2 binary64) d)
86.2%1(*.f64 M D)
90.5%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)))
90.5%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))))
90.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)))))
86.2%1w0
86.2%1M
86.2%1h
87.8%2l
88.1%2d
86.2%1D
90.5%3(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
91.2%3(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
91.2%3(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
88.4%1(/.f64 h l)
88.4%1(*.f64 #s(literal 2 binary64) d)
88.4%1(*.f64 M D)
90.7%2(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
90.7%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
90.5%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
88.4%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)))
88.4%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))))
88.4%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)))))
88.4%1w0
88.4%1M
88.4%1D
88.4%1h
88.4%1l
88.4%1d
Compiler

Compiled 2 903 to 1 125 computations (61.2% saved)

bsearch1.0ms (0%)

Memory
1.0MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.7139983252420533e+266
7.528469862461791e+266
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.7139983252420533e+266
7.528469862461791e+266
0.0ms
2.318139823733501e-19
1.1142006516876602e-18
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.7139983252420533e+266
7.528469862461791e+266
0.0ms
2.318139823733501e-19
1.1142006516876602e-18
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-2.0848323738798228e+52
-2.574200239198695e-13
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-2.0848323738798228e+52
-2.574200239198695e-13
Compiler

Compiled 21 to 26 computations (-23.8% saved)

derivations37.0ms (0.8%)

Memory
-1.1MiB live, 43.7MiB allocated; 4ms collecting garbage
Stop Event
fuel
Compiler

Compiled 592 to 108 computations (81.8% saved)

preprocess256.0ms (5.4%)

Memory
-5.2MiB live, 467.3MiB allocated; 68ms collecting garbage
Remove

(sort M D)

(negabs w0)

(abs d)

(abs D)

(abs M)

Compiler

Compiled 10 710 to 5 737 computations (46.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...