Henrywood and Agarwal, Equation (9a)

Time bar (total: 3.6s)

start0.0ms (0%)

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

analyze654.0ms (18%)

Memory
23.3MiB live, 537.9MiB allocated; 661ms 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 (41.5%)

Memory
76.2MiB live, 1 880.5MiB allocated; 340ms collecting garbage
Samples
772.0ms8 256×0valid
232.0ms2 696×0invalid
Precisions
Click to see histograms. Total time spent on operations: 600.0ms
ival-mult!: 220.0ms (36.6% of total)
ival-div!: 154.0ms (25.6% of total)
ival-pow2: 114.0ms (19% of total)
ival-sqrt: 85.0ms (14.2% of total)
ival-sub!: 26.0ms (4.3% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

preprocess51.0ms (1.4%)

Memory
-8.3MiB live, 37.3MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0168514
1684510
23087510
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.0%
(*.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)

series99.0ms (2.7%)

Memory
30.4MiB live, 173.6MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePoint
9.0ms
M
-inf
6.0ms
D
0
6.0ms
D
-inf
6.0ms
M
0
6.0ms
h
-inf

rewrite58.0ms (1.6%)

Memory
-16.7MiB live, 81.4MiB allocated; 12ms 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

eval33.0ms (0.9%)

Memory
23.4MiB live, 68.9MiB allocated; 3ms collecting garbage
Compiler

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

prune14.0ms (0.4%)

Memory
-22.3MiB live, 23.1MiB allocated; 4ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New27512287
Fresh000
Picked101
Done000
Total27612288
Accuracy
89.9%
Counts
288 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.0%
(*.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)
71.5%
(*.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.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 D (/.f64 M (+.f64 d d))) #s(literal 2 binary64)) (/.f64 h l)))))
75.2%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (/.f64 (+.f64 d d) (*.f64 D M))) (/.f64 h l)))))
79.0%
(*.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)))))
77.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 D (+.f64 d d)) M) (*.f64 (/.f64 D (+.f64 d d)) M)) (/.f64 h l)))))
74.0%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 D M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) (*.f64 (/.f64 D (+.f64 d d)) M))) (/.f64 h l)))))
18.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))))))))
20.0%
(*.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.1%
(*.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)))))))))
65.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
18.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
Compiler

Compiled 660 to 518 computations (21.5% saved)

series124.0ms (3.4%)

Memory
3.3MiB live, 147.6MiB allocated; 35ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePoint
21.0ms
h
-inf
13.0ms
M
0
6.0ms
d
0
5.0ms
M
inf
5.0ms
D
0

rewrite39.0ms (1.1%)

Memory
3.9MiB live, 49.5MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval41.0ms (1.1%)

Memory
-18.5MiB live, 73.6MiB allocated; 17ms collecting garbage
Compiler

Compiled 12 580 to 1 796 computations (85.7% saved)

prune13.0ms (0.3%)

Memory
30.0MiB live, 30.0MiB allocated; 0ms collecting garbage
Pruning

14 alts after pruning (13 fresh and 1 done)

PrunedKeptTotal
New2808288
Fresh257
Picked415
Done000
Total28614300
Accuracy
92.9%
Counts
300 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.0%
(*.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)
67.4%
(*.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)
66.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h) (*.f64 (+.f64 d d) (+.f64 d d))) l))))
75.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (+.f64 d d)) (+.f64 d d)) h) l))))
73.9%
(*.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))))
86.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
78.2%
(*.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))))))
80.8%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (/.f64 M (+.f64 d d)) D)) (*.f64 (/.f64 M (+.f64 d d)) D)))))
79.6%
(*.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)))))
18.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))))))))
20.0%
(*.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.1%
(*.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)))))))))
65.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
18.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
Compiler

Compiled 772 to 581 computations (24.7% saved)

series127.0ms (3.5%)

Memory
-0.1MiB live, 235.7MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePoint
9.0ms
D
0
9.0ms
M
0
8.0ms
l
-inf
8.0ms
h
inf
7.0ms
M
-inf

rewrite44.0ms (1.2%)

Memory
-1.0MiB live, 45.3MiB allocated; 2ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval45.0ms (1.2%)

Memory
-18.6MiB live, 74.2MiB allocated; 11ms collecting garbage
Compiler

Compiled 15 529 to 2 136 computations (86.2% saved)

prune19.0ms (0.5%)

Memory
39.9MiB live, 39.9MiB allocated; 0ms collecting garbage
Pruning

23 alts after pruning (20 fresh and 3 done)

PrunedKeptTotal
New33715352
Fresh358
Picked325
Done011
Total34323366
Accuracy
94.2%
Counts
366 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
73.9%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l))) w0)
63.9%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)))) w0)
65.0%
(*.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)
77.4%
(*.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)
67.4%
(*.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)
74.0%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) (*.f64 (/.f64 M (+.f64 d d)) (/.f64 D (+.f64 d d)))) (/.f64 h l)))) w0)
69.0%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l))))) w0)
20.1%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 (*.f64 d d) l))))) D)) w0)
75.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (+.f64 d d)) (+.f64 d d)) h) l))))
80.0%
(*.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.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
85.7%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 h (/.f64 (*.f64 (/.f64 D (+.f64 d d)) M) l)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
79.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (/ (* h (* M (/ D (+ d d)))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
18.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))))))))
20.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l))))))))
21.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 (*.f64 M M) (*.f64 d d)) (/.f64 h l))))))))
23.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d)))))
23.2%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))))
2.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))) d))))))
1.8%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))))
1.1%
(*.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)))))))))
65.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
18.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
Compiler

Compiled 1 418 to 1 075 computations (24.2% saved)

series185.0ms (5.1%)

Memory
-46.0MiB live, 251.7MiB allocated; 93ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePoint
35.0ms
d
0
20.0ms
M
0
13.0ms
M
-inf
9.0ms
h
-inf
7.0ms
D
-inf

rewrite52.0ms (1.4%)

Memory
40.2MiB live, 84.6MiB allocated; 9ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval56.0ms (1.6%)

Memory
-36.4MiB live, 106.9MiB allocated; 36ms collecting garbage
Compiler

Compiled 17 058 to 2 265 computations (86.7% saved)

prune20.0ms (0.6%)

Memory
5.9MiB live, 51.7MiB allocated; 5ms collecting garbage
Pruning

23 alts after pruning (20 fresh and 3 done)

PrunedKeptTotal
New35415369
Fresh10515
Picked505
Done033
Total36923392
Accuracy
95.5%
Counts
392 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
73.9%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 D M) (*.f64 (+.f64 d d) (+.f64 d d))) (*.f64 D M)) h) l))) w0)
63.9%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 D M) D) M) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)))) w0)
77.4%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) h) (*.f64 M (/.f64 D (+.f64 d d)))) (*.f64 l (+.f64 d d))))) w0)
79.6%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 M D) h) l) (+.f64 d d)) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
79.6%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (* h (* D M)) (*.f64 D (*.f64 M h))) (*.f64 l (+.f64 d d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
67.4%
(*.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)
75.5%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 D M) (/.f64 (*.f64 (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)))) w0)
71.6%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 D (*.f64 M (/.f64 (*.f64 (*.f64 M D) h) (*.f64 (*.f64 (+.f64 d d) (+.f64 d d)) l)))))) w0)
20.0%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 d d) l)))) D)) w0)
22.0%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d (*.f64 d l)))))) D)) w0)
21.6%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 M (*.f64 M (/.f64 h (*.f64 (*.f64 d d) l)))))) D)) w0)
1.8%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (* -1/4 (* (* M M) (/ h (* (* d d) l))))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))) D)) w0)
23.2%
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h (*.f64 (*.f64 d d) l)))) M)) D)) w0)
75.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (+.f64 d d)) (+.f64 d d)) h) l))))
86.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
27.8%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d)))))))
9.9%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 h (sqrt.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 d #s(literal 2 binary64)) (*.f64 h l)))))))))))
1.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) (*.f64 M #s(approx (sqrt (neg (* 1/4 (/ h (* (pow d 2) l))))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))) d))))))))
28.0%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) #s(approx (* M (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))) d))))))
1.3%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) (* (pow d 2) l))))) #s(approx (* M (sqrt (neg (* 1/4 (/ h (* (pow d 2) l)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))) d)))))))
1.1%
(*.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)))))))))
65.5%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
18.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 M (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
Compiler

Compiled 857 to 628 computations (26.7% saved)

regimes329.0ms (9.1%)

Memory
30.9MiB live, 505.7MiB allocated; 104ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

31 calls:

36.0ms
(/.f64 h l)
32.0ms
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
32.0ms
M
27.0ms
(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))))
22.0ms
(-.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)))
Results
AccuracySegmentsBranch
65.5%1l
65.5%1(/.f64 h l)
65.5%1D
65.5%1w0
65.5%1M
65.5%1h
65.5%1(*.f64 #s(literal 2 binary64) d)
65.5%1(*.f64 M D)
65.5%1d
65.5%1(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
65.5%1(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
65.5%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))))
65.5%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)))))
65.5%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)))
65.5%1(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
89.2%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
86.5%1(/.f64 h l)
86.5%1(*.f64 #s(literal 2 binary64) d)
86.5%1(*.f64 M D)
88.5%2(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
88.5%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
89.2%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
90.6%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)))))
86.5%1w0
86.5%1M
86.5%1D
86.5%1h
86.5%1l
86.5%1d
Compiler

Compiled 1 907 to 694 computations (63.6% saved)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-2405440384832882000.0
-1380.781409092417
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
-1380.781409092417
-6.409593369983615e-17
Compiler

Compiled 21 to 26 computations (-23.8% saved)

derivations14.0ms (0.4%)

Memory
-28.2MiB live, 19.0MiB allocated; 2ms collecting garbage
Stop Event
fuel
Compiler

Compiled 220 to 66 computations (70% saved)

preprocess104.0ms (2.9%)

Memory
25.8MiB live, 166.1MiB allocated; 15ms collecting garbage
Remove

(sort M D)

(negabs w0)

(abs d)

(abs D)

(abs M)

Compiler

Compiled 3 834 to 2 221 computations (42.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...