Henrywood and Agarwal, Equation (9a)

Time bar (total: 4.0s)

start0.0ms (0%)

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

analyze523.0ms (12.9%)

Memory
0.3MiB live, 615.0MiB allocated; 185ms 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.7s (43.1%)

Memory
69.5MiB live, 2 722.6MiB allocated; 515ms collecting garbage
Samples
920.0ms8 256×0valid
301.0ms2 827×0invalid
Precisions
Click to see histograms. Total time spent on operations: 720.0ms
ival-mult!: 278.0ms (38.6% of total)
ival-div!: 172.0ms (23.9% of total)
ival-pow2: 153.0ms (21.3% of total)
ival-sqrt: 76.0ms (10.6% of total)
ival-sub!: 39.0ms (5.4% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

preprocess50.0ms (1.2%)

Memory
6.1MiB live, 52.5MiB allocated; 4ms 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
83.6%
(*.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)

series262.0ms (6.5%)

Memory
-9.8MiB live, 217.5MiB allocated; 196ms 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:

TimeVariablePointExpression
168.0ms
M
@inf
((* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) 2 d (/ h l) h l)
7.0ms
h
@0
((* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) 2 d (/ h l) h l)
7.0ms
d
@0
((* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) 2 d (/ h l) h l)
6.0ms
D
@-inf
((* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) 2 d (/ h l) h l)
6.0ms
M
@0
((* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))) 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) 2 d (/ h l) h l)

rewrite70.0ms (1.7%)

Memory
13.6MiB live, 96.6MiB allocated; 24ms 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

eval37.0ms (0.9%)

Memory
-35.5MiB live, 58.7MiB allocated; 8ms collecting garbage
Compiler

Compiled 5 887 to 1 734 computations (70.5% saved)

prune10.0ms (0.2%)

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

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New27710287
Fresh000
Picked101
Done000
Total27810288
Accuracy
94.5%
Counts
288 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.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)
50.4%
(*.f64 w0 (/.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)))))
82.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) #s(literal 1 binary64)) (*.f64 (+.f64 d d) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l)))))
83.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l)))))
85.9%
(*.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)))))
75.1%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 h (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))))))
18.6%
(*.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))))))))
2.4%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
67.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
18.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
Compiler

Compiled 478 to 434 computations (9.2% saved)

series188.0ms (4.6%)

Memory
5.5MiB live, 333.5MiB allocated; 61ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
12.0ms
l
@inf
((* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (/ h l) h l (* (/ D (+ d d)) M) (/ D (+ d d)) D (+ d d) d M (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (* w0 (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))))) (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))))) (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))) (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))) (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))) (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* w0 (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))))) (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)))) (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))) (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)) (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M))) (/ (+ d d) (* D M)) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)) 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l) (* (pow D 2) (* (pow M 2) h)) (pow D 2) 2 (* (pow M 2) h) (pow M 2))
11.0ms
d
@-inf
((* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (/ h l) h l (* (/ D (+ d d)) M) (/ D (+ d d)) D (+ d d) d M (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (* w0 (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))))) (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))))) (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))) (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))) (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))) (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* w0 (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))))) (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)))) (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))) (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)) (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M))) (/ (+ d d) (* D M)) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)) 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l) (* (pow D 2) (* (pow M 2) h)) (pow D 2) 2 (* (pow M 2) h) (pow M 2))
10.0ms
M
@inf
((* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (/ h l) h l (* (/ D (+ d d)) M) (/ D (+ d d)) D (+ d d) d M (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (* w0 (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))))) (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))))) (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))) (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))) (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))) (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* w0 (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))))) (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)))) (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))) (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)) (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M))) (/ (+ d d) (* D M)) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)) 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l) (* (pow D 2) (* (pow M 2) h)) (pow D 2) 2 (* (pow M 2) h) (pow M 2))
9.0ms
D
@0
((* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (/ h l) h l (* (/ D (+ d d)) M) (/ D (+ d d)) D (+ d d) d M (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (* w0 (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))))) (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))))) (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))) (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))) (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))) (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* w0 (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))))) (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)))) (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))) (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)) (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M))) (/ (+ d d) (* D M)) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)) 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l) (* (pow D 2) (* (pow M 2) h)) (pow D 2) 2 (* (pow M 2) h) (pow M 2))
9.0ms
w0
@0
((* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (/ h l) h l (* (/ D (+ d d)) M) (/ D (+ d d)) D (+ d d) d M (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (* w0 (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))))) (sqrt (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))))) (- 1 (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))))) (* h (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))))) (* (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d)))) (/ 1 l) (/ (* (* D M) (* D M)) (* (+ d d) (+ d d))) (* (* D M) (* D M)) (* D M) (* (+ d d) (+ d d)) (* w0 (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))))) (sqrt (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)))) (- 1 (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l))) (* (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (/ h l)) (/ 1 (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M)))) (* (/ (+ d d) (* D M)) (/ (+ d d) (* D M))) (/ (+ d d) (* D M)) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)) 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l) (* (pow D 2) (* (pow M 2) h)) (pow D 2) 2 (* (pow M 2) h) (pow M 2))

rewrite47.0ms (1.2%)

Memory
14.4MiB live, 59.0MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057590
094449
0397449
Stop Event
iter-limit
iter-limit
iter-limit
unsound
iter-limit
Counts
48 → 216
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 h (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.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 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 #s(literal 1 binary64) l) (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 #s(literal 1 binary64) l)
(/.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 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l))))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M))))
(*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))
(/.f64 (+.f64 d d) (*.f64 D M))
#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))
(/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d)
(*.f64 w0 (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)))))
(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))))
(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/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))
#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)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h))
(pow.f64 D #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (pow.f64 M #s(literal 2 binary64)) h)
(pow.f64 M #s(literal 2 binary64))
Outputs
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))))
w0
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))))
(neg.f64 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) 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 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
#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 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.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 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 h (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 h l)) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)))
(/.f64 (*.f64 #s(literal 1 binary64) h) (*.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) l))
(*.f64 (*.f64 (/.f64 h l) (/.f64 D (+.f64 d d))) M)
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l))
(*.f64 (/.f64 h l) (*.f64 M (/.f64 D (+.f64 d d))))
(/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l)
(*.f64 h (/.f64 #s(literal 1 binary64) l))
(/.f64 (neg.f64 h) (neg.f64 l))
(/.f64 h l)
(/.f64 #s(literal 1 binary64) (/.f64 l h))
h
l
(*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))
(*.f64 (*.f64 M D) (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(*.f64 M (/.f64 D (+.f64 d d)))
(*.f64 (/.f64 D (+.f64 d d)) M)
(/.f64 (/.f64 (*.f64 M D) #s(literal 2 binary64)) d)
(/.f64 (neg.f64 (*.f64 M D)) (neg.f64 (+.f64 d d)))
(/.f64 (*.f64 M D) (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) (*.f64 M D)))
(*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d)))
(/.f64 (neg.f64 D) (neg.f64 (+.f64 d d)))
(/.f64 D (+.f64 d d))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 d d) D))
D
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 d d)) d)
(*.f64 #s(literal 2 binary64) d)
(*.f64 d #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 d d) (*.f64 d d)) (-.f64 d d))
(/.f64 (+.f64 (pow.f64 d #s(literal 3 binary64)) (pow.f64 d #s(literal 3 binary64))) (fma.f64 d d (-.f64 (*.f64 d d) (*.f64 d d))))
(-.f64 d (neg.f64 d))
(+.f64 d d)
d
M
(*.f64 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)) w0)
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))))
(neg.f64 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) 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 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.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 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 h (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 h l)) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)))
(/.f64 (*.f64 #s(literal 1 binary64) h) (*.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) l))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 #s(literal 1 binary64) l))
(*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) l) (*.f64 (*.f64 (*.f64 M D) D) M)) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 M D) D) M)) (*.f64 l (*.f64 (+.f64 d d) (+.f64 d d))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l)
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) l))
(pow.f64 l #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 l))
(/.f64 #s(literal 1 binary64) (/.f64 l #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) l)
(*.f64 (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)) (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))))
(pow.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) #s(literal -1 binary64))
(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 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 (+.f64 d d) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)))
(exp.f64 (*.f64 (log.f64 (*.f64 M (/.f64 D (+.f64 d d)))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 M D) D) M)
(*.f64 (fabs.f64 (*.f64 M D)) (fabs.f64 (*.f64 M D)))
(*.f64 (neg.f64 (*.f64 M D)) (neg.f64 (*.f64 M D)))
(*.f64 (*.f64 D D) (*.f64 M M))
(*.f64 (*.f64 M D) (*.f64 M D))
(*.f64 D (*.f64 M (*.f64 M D)))
(pow.f64 (*.f64 M D) #s(literal 2 binary64))
(*.f64 M D)
(*.f64 D M)
(*.f64 (fabs.f64 (+.f64 d d)) (fabs.f64 (+.f64 d d)))
(*.f64 (neg.f64 (+.f64 d d)) (neg.f64 (+.f64 d d)))
(*.f64 (+.f64 d d) (+.f64 d d))
(pow.f64 (+.f64 d d) #s(literal 2 binary64))
(fma.f64 (+.f64 d d) d (*.f64 (+.f64 d d) d))
(fma.f64 d (+.f64 d d) (*.f64 d (+.f64 d d)))
(+.f64 (*.f64 (+.f64 d d) d) (*.f64 (+.f64 d d) d))
(+.f64 (*.f64 d (+.f64 d d)) (*.f64 d (+.f64 d d)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))))
(pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(fabs.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))))
(neg.f64 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))) (/.f64 h l)))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 h) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) 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 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)))
(*.f64 (*.f64 (*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 h l)) (/.f64 D (+.f64 d d))) M)
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l) h)
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.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 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 h (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) l))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))) h) l)
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 h l)) (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)))
(/.f64 (*.f64 #s(literal 1 binary64) h) (*.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) l))
(*.f64 (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)) (pow.f64 (*.f64 M (/.f64 D (+.f64 d d))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M D) (/.f64 (*.f64 M D) (*.f64 (+.f64 d d) (+.f64 d d))))
(*.f64 (*.f64 M (/.f64 D (+.f64 d d))) (*.f64 M (/.f64 D (+.f64 d d))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d))))
(pow.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) #s(literal -1 binary64))
(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 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M))))
(/.f64 (*.f64 (*.f64 (*.f64 M D) D) M) (*.f64 (+.f64 d d) (+.f64 d d)))
(/.f64 (*.f64 M (/.f64 D (+.f64 d d))) (/.f64 (+.f64 d d) (*.f64 M D)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M)) #s(literal 1 binary64)))
(/.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 (fabs.f64 (/.f64 (+.f64 d d) (*.f64 M D))) (fabs.f64 (/.f64 (+.f64 d d) (*.f64 M D))))
(*.f64 (neg.f64 (/.f64 (+.f64 d d) (*.f64 M D))) (neg.f64 (/.f64 (+.f64 d d) (*.f64 M D))))
(*.f64 (/.f64 (+.f64 d d) (*.f64 M D)) (/.f64 (+.f64 d d) (*.f64 M D)))
(pow.f64 (/.f64 (+.f64 d d) (*.f64 M D)) #s(literal 2 binary64))
(/.f64 (*.f64 (/.f64 (+.f64 d d) (*.f64 M D)) (+.f64 d d)) (*.f64 M D))
(/.f64 (*.f64 (+.f64 d d) (/.f64 (+.f64 d d) (*.f64 M D))) (*.f64 M D))
(/.f64 (*.f64 (+.f64 d d) (+.f64 d d)) (*.f64 (*.f64 (*.f64 M D) D) M))
(*.f64 (+.f64 d d) (/.f64 #s(literal 1 binary64) (*.f64 M D)))
(/.f64 (/.f64 (+.f64 d d) D) M)
(/.f64 (neg.f64 (+.f64 d d)) (neg.f64 (*.f64 M D)))
(/.f64 (+.f64 d d) (*.f64 M D))
(/.f64 #s(literal 1 binary64) (*.f64 M (/.f64 D (+.f64 d d))))
(+.f64 (/.f64 d (*.f64 M D)) (/.f64 d (*.f64 M D)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) d))
(*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) (/.f64 #s(literal 1 binary64) d))
(*.f64 w0 (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) d))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0)) (neg.f64 d))
(/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) d)
(/.f64 #s(literal 1 binary64) (/.f64 d (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0)))
(*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0)
(*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))))
(pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))
(*.f64 #s(literal 1/4 binary64) (neg.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l))))
(neg.f64 (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D))) l)
#s(literal 1/4 binary64)
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (/.f64 #s(literal 1 binary64) l))
(*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D))) (neg.f64 l))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) l)
(/.f64 #s(literal 1 binary64) (/.f64 l (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D))))
(*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))
(*.f64 (*.f64 (*.f64 (*.f64 M D) D) M) h)
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 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)))

eval64.0ms (1.6%)

Memory
-11.4MiB live, 80.9MiB allocated; 59ms collecting garbage
Compiler

Compiled 6 743 to 2 010 computations (70.2% saved)

prune18.0ms (0.4%)

Memory
-9.1MiB live, 36.6MiB allocated; 4ms collecting garbage
Pruning

16 alts after pruning (15 fresh and 1 done)

PrunedKeptTotal
New30713320
Fresh325
Picked415
Done000
Total31416330
Accuracy
97.8%
Counts
330 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.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)
50.4%
(*.f64 w0 (/.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)))))
91.0%
(*.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)))))
86.7%
(*.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))))))
85.9%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)))))
84.5%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) (/.f64 D (+.f64 d d))) M) (*.f64 (/.f64 D (+.f64 d d)) M)))))
83.9%
(*.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)))))
67.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
19.3%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) d))
24.7%
#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 (*.f64 (*.f64 (*.f64 M D) D) M) h) l))))) d))
9.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))) l))) d))
23.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))))) d))
23.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))))) d))
2.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 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) l)))))))) d))
9.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) l)) d))
2.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l)))))) d))))
Compiler

Compiled 929 to 883 computations (5% saved)

series173.0ms (4.3%)

Memory
29.3MiB live, 362.6MiB allocated; 27ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
23.0ms
M
@0
((* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)) (/ (* h (* M (/ D (+ d d)))) l) (* h (* M (/ D (+ d d)))) h (* M (/ D (+ d d))) M (/ D (+ d d)) D (+ d d) d l (* (/ D (+ d d)) M) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) d) (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (* -1/4 (* (* D D) (/ (* (* M M) h) l))) -1/4 (* (* D D) (/ (* (* M M) h) l)) (* D D) (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* D (* M h)) (* d l))) 1/2 (/ (* D (* M h)) (* d l)) (* D (* M h)) (* M h) (* d l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (neg (* 1/4 (/ (* (pow M 2) h) l))) (* 1/4 (/ (* (pow M 2) h) l)) 1/4 (/ (* (pow M 2) h) l) (* (pow M 2) h) (pow M 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))))) -1)
12.0ms
M
@-inf
((* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)) (/ (* h (* M (/ D (+ d d)))) l) (* h (* M (/ D (+ d d)))) h (* M (/ D (+ d d))) M (/ D (+ d d)) D (+ d d) d l (* (/ D (+ d d)) M) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) d) (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (* -1/4 (* (* D D) (/ (* (* M M) h) l))) -1/4 (* (* D D) (/ (* (* M M) h) l)) (* D D) (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* D (* M h)) (* d l))) 1/2 (/ (* D (* M h)) (* d l)) (* D (* M h)) (* M h) (* d l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (neg (* 1/4 (/ (* (pow M 2) h) l))) (* 1/4 (/ (* (pow M 2) h) l)) 1/4 (/ (* (pow M 2) h) l) (* (pow M 2) h) (pow M 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))))) -1)
9.0ms
d
@inf
((* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)) (/ (* h (* M (/ D (+ d d)))) l) (* h (* M (/ D (+ d d)))) h (* M (/ D (+ d d))) M (/ D (+ d d)) D (+ d d) d l (* (/ D (+ d d)) M) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) d) (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (* -1/4 (* (* D D) (/ (* (* M M) h) l))) -1/4 (* (* D D) (/ (* (* M M) h) l)) (* D D) (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* D (* M h)) (* d l))) 1/2 (/ (* D (* M h)) (* d l)) (* D (* M h)) (* M h) (* d l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (neg (* 1/4 (/ (* (pow M 2) h) l))) (* 1/4 (/ (* (pow M 2) h) l)) 1/4 (/ (* (pow M 2) h) l) (* (pow M 2) h) (pow M 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))))) -1)
8.0ms
D
@inf
((* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)) (/ (* h (* M (/ D (+ d d)))) l) (* h (* M (/ D (+ d d)))) h (* M (/ D (+ d d))) M (/ D (+ d d)) D (+ d d) d l (* (/ D (+ d d)) M) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) d) (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (* -1/4 (* (* D D) (/ (* (* M M) h) l))) -1/4 (* (* D D) (/ (* (* M M) h) l)) (* D D) (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* D (* M h)) (* d l))) 1/2 (/ (* D (* M h)) (* d l)) (* D (* M h)) (* M h) (* d l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (neg (* 1/4 (/ (* (pow M 2) h) l))) (* 1/4 (/ (* (pow M 2) h) l)) 1/4 (/ (* (pow M 2) h) l) (* (pow M 2) h) (pow M 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))))) -1)
8.0ms
h
@-inf
((* w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))))) w0 (sqrt (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)))) (- 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M))) 1 (* (/ (* h (* M (/ D (+ d d)))) l) (* (/ D (+ d d)) M)) (/ (* h (* M (/ D (+ d d)))) l) (* h (* M (/ D (+ d d)))) h (* M (/ D (+ d d))) M (/ D (+ d d)) D (+ d d) d l (* (/ D (+ d d)) M) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) d) (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (* -1/4 (* (* D D) (/ (* (* M M) h) l))) -1/4 (* (* D D) (/ (* (* M M) h) l)) (* D D) (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* D (* M h)) (* d l))) 1/2 (/ (* D (* M h)) (* d l)) (* D (* M h)) (* M h) (* d l) (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (neg (* 1/4 (/ (* (pow M 2) h) l))) (* 1/4 (/ (* (pow M 2) h) l)) 1/4 (/ (* (pow M 2) h) l) (* (pow M 2) h) (pow M 2) 2 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* -1 (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))))) -1)

rewrite46.0ms (1.1%)

Memory
-14.8MiB live, 78.3MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval44.0ms (1.1%)

Memory
6.9MiB live, 101.0MiB allocated; 9ms collecting garbage
Compiler

Compiled 7 697 to 2 165 computations (71.9% saved)

prune19.0ms (0.5%)

Memory
4.1MiB live, 48.6MiB allocated; 3ms collecting garbage
Pruning

18 alts after pruning (16 fresh and 2 done)

PrunedKeptTotal
New35512367
Fresh6410
Picked415
Done011
Total36518383
Accuracy
98.5%
Counts
383 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.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)
85.9%
(*.f64 (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)
83.9%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
50.4%
(*.f64 w0 (/.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)))))
91.0%
(*.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)))))
86.7%
(*.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))))))
85.9%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)))))
83.0%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (/.f64 D (+.f64 d d))) M))))
84.7%
(*.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 (*.f64 D M) h) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
67.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
23.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) w0) d))
23.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) w0) d))
2.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) w0) d))
30.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))) d))
1.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))))) d))
9.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 #s(approx (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) l)) d))
23.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) d)))
2.8%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) d)))
Compiler

Compiled 1 048 to 994 computations (5.2% saved)

series181.0ms (4.5%)

Memory
-4.8MiB live, 234.6MiB allocated; 68ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

18 calls:

TimeVariablePointExpression
27.0ms
M
@-inf
((* w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))))) w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))))) (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))) 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))) (* (/ h l) (/ (* M D) (+ d d))) (/ h l) h l (/ (* M D) (+ d d)) (* M D) M D (+ d d) d (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (* M (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) d) (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D)) (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D) (sqrt (* -1/4 (/ (* (* M M) h) l))) (* -1/4 (/ (* (* M M) h) l)) -1/4 (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* (* D M) h) (* d l))) 1/2 (/ (* (* D M) h) (* d l)) (* (* D M) h) (* D M) (* d l) (* (/ D (+ d d)) M) (/ D (+ d d)) (* w0 (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))))) (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)))) (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))) (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)) (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M) (* D (/ 1 (+ d d))) (/ 1 (+ d d)))
19.0ms
w0
@-inf
((* w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))))) w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))))) (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))) 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))) (* (/ h l) (/ (* M D) (+ d d))) (/ h l) h l (/ (* M D) (+ d d)) (* M D) M D (+ d d) d (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (* M (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) d) (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D)) (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D) (sqrt (* -1/4 (/ (* (* M M) h) l))) (* -1/4 (/ (* (* M M) h) l)) -1/4 (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* (* D M) h) (* d l))) 1/2 (/ (* (* D M) h) (* d l)) (* (* D M) h) (* D M) (* d l) (* (/ D (+ d d)) M) (/ D (+ d d)) (* w0 (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))))) (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)))) (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))) (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)) (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M) (* D (/ 1 (+ d d))) (/ 1 (+ d d)))
15.0ms
D
@inf
((* w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))))) w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))))) (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))) 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))) (* (/ h l) (/ (* M D) (+ d d))) (/ h l) h l (/ (* M D) (+ d d)) (* M D) M D (+ d d) d (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (* M (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) d) (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D)) (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D) (sqrt (* -1/4 (/ (* (* M M) h) l))) (* -1/4 (/ (* (* M M) h) l)) -1/4 (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* (* D M) h) (* d l))) 1/2 (/ (* (* D M) h) (* d l)) (* (* D M) h) (* D M) (* d l) (* (/ D (+ d d)) M) (/ D (+ d d)) (* w0 (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))))) (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)))) (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))) (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)) (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M) (* D (/ 1 (+ d d))) (/ 1 (+ d d)))
9.0ms
h
@-inf
((* w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))))) w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))))) (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))) 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))) (* (/ h l) (/ (* M D) (+ d d))) (/ h l) h l (/ (* M D) (+ d d)) (* M D) M D (+ d d) d (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (* M (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) d) (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D)) (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D) (sqrt (* -1/4 (/ (* (* M M) h) l))) (* -1/4 (/ (* (* M M) h) l)) -1/4 (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* (* D M) h) (* d l))) 1/2 (/ (* (* D M) h) (* d l)) (* (* D M) h) (* D M) (* d l) (* (/ D (+ d d)) M) (/ D (+ d d)) (* w0 (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))))) (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)))) (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))) (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)) (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M) (* D (/ 1 (+ d d))) (/ 1 (+ d d)))
7.0ms
D
@-inf
((* w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))))) w0 (sqrt (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))))) (- 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d)))) 1 (* (* (/ h l) (/ (* M D) (+ d d))) (/ (* M D) (+ d d))) (* (/ h l) (/ (* M D) (+ d d))) (/ h l) h l (/ (* M D) (+ d d)) (* M D) M D (+ d d) d (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (* D (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l))))) (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (* M (sqrt (neg (* 1/4 (/ h l))))) (sqrt (neg (* 1/4 (/ h l)))) (neg (* 1/4 (/ h l))) (* 1/4 (/ h l)) 1/4 (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/ (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) d) (* (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) w0) (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D)) (* (sqrt (* -1/4 (/ (* (* M M) h) l))) D) (sqrt (* -1/4 (/ (* (* M M) h) l))) (* -1/4 (/ (* (* M M) h) l)) -1/4 (/ (* (* M M) h) l) (* (* M M) h) (* M M) (* w0 (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))))) (sqrt (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)))) (- 1 (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M))) (* (* (/ h l) (* (/ D (+ d d)) M)) (* (/ D (+ d d)) M)) (* (/ h l) (* (/ D (+ d d)) M)) (* 1/2 (/ (* (* D M) h) (* d l))) 1/2 (/ (* (* D M) h) (* d l)) (* (* D M) h) (* D M) (* d l) (* (/ D (+ d d)) M) (/ D (+ d d)) (* w0 (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))))) (sqrt (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)))) (- 1 (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M))) (* (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M)) (* (/ h l) (* (* D (/ 1 (+ d d))) M)) (* (* D (/ 1 (+ d d))) M) (* D (/ 1 (+ d d))) (/ 1 (+ d d)))

rewrite41.0ms (1%)

Memory
33.2MiB live, 33.2MiB allocated; 0ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval57.0ms (1.4%)

Memory
-40.5MiB live, 53.0MiB allocated; 26ms collecting garbage
Compiler

Compiled 7 594 to 2 247 computations (70.4% saved)

prune25.0ms (0.6%)

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

17 alts after pruning (15 fresh and 2 done)

PrunedKeptTotal
New34010350
Fresh6511
Picked415
Done112
Total35117368
Accuracy
98.5%
Counts
368 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.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)
83.7%
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (/.f64 D (+.f64 d d))) M))) w0)
85.9%
(*.f64 (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)
50.4%
(*.f64 w0 (/.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)))))
86.6%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
86.7%
(*.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))))))
84.4%
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 (*.f64 (*.f64 D M) (/.f64 h (*.f64 d l))) #s(literal 1/2 binary64))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
67.1%
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
30.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) w0) d))
2.4%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h l)) #s(literal -1/4 binary64))) D))) w0) d))
1.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 #s(approx (sqrt (* -1/4 (/ (* (* M M) h) l))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) D))) w0) d))
30.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (/.f64 #s(literal 1 binary64) l)))))))))) d))
13.2%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))))) d))
9.5%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 #s(approx (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) l)) d))
2.7%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (neg.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) l))) D)) (/.f64 w0 d)))
23.6%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) d)))
30.9%
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) d)))
Compiler

Compiled 1 310 to 905 computations (30.9% saved)

regimes166.0ms (4.1%)

Memory
-6.9MiB live, 181.9MiB allocated; 20ms collecting garbage
Counts
46 → 2
Calls
Call 1
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 #s(approx (sqrt (* -1/4 (/ (* (* M M) h) l))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (neg.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) l))) D)) (/.f64 w0 d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (/.f64 #s(literal 1 binary64) l)))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h l)) #s(literal -1/4 binary64))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) d))
#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 (*.f64 (*.f64 (*.f64 M D) D) M) h) l))))) d))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (/.f64 D (+.f64 d d))) M))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D 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 l) (* (/ D (+ d d)) M)) (*.f64 (*.f64 (*.f64 D M) (/.f64 h (*.f64 d l))) #s(literal 1/2 binary64))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (/.f64 D (+.f64 d d))) M))))
(*.f64 (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)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) (/.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 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 h (*.f64 M (/.f64 D (+.f64 d d)))) l) (*.f64 (/.f64 D (+.f64 d d)) M)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) l))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) h) l))))))) d))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.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 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) #s(literal 1 binary64)) (*.f64 (+.f64 d d) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.f64 h l)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 d d) (*.f64 D M)) (/.f64 (+.f64 d d) (*.f64 D M)))) (/.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)))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) #s(approx (/ (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) d) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 D (*.f64 w0 (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 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 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) l)))))))) d))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)) (*.f64 (*.f64 D (/.f64 #s(literal 1 binary64) (+.f64 d d))) M)))))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l))))))))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) h)) l))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (/.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l))))) l))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 #s(approx (* w0 (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l))))) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) l)) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 #s(approx (* (sqrt (* -1/4 (* (* D D) (/ (* (* M M) h) l)))) w0) (/.f64 (*.f64 w0 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 D #s(literal 2 binary64)) (*.f64 (pow.f64 M #s(literal 2 binary64)) (*.f64 h l)))))) l)) d))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) (*.f64 #s(literal -1 binary64) (*.f64 D (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 M #s(literal 2 binary64)) h) (*.f64 (pow.f64 d #s(literal 2 binary64)) l)))))))))
(*.f64 w0 (/.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)))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) w0) 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)))))
Calls

15 calls:

15.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))))
14.0ms
D
12.0ms
d
12.0ms
(*.f64 M D)
11.0ms
M
Results
AccuracySegmentsBranch
91.0%1(/.f64 h l)
91.0%1(*.f64 #s(literal 2 binary64) d)
91.0%1(*.f64 M D)
94.7%2(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
94.7%2(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
95.4%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
96.2%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
96.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))))
96.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)))))
91.0%1w0
91.0%1M
91.0%1D
91.0%1h
91.0%1l
91.0%1d
Compiler

Compiled 93 to 140 computations (-50.5% saved)

regimes48.0ms (1.2%)

Memory
-10.1MiB live, 36.1MiB allocated; 3ms collecting garbage
Counts
28 → 3
Calls
Call 1
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 #s(approx (sqrt (* -1/4 (/ (* (* M M) h) l))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (neg.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) l))) D)) (/.f64 w0 d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (/.f64 #s(literal 1 binary64) l)))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h l)) #s(literal -1/4 binary64))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) d))
#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 (*.f64 (*.f64 (*.f64 M D) D) M) h) l))))) d))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (/.f64 D (+.f64 d d))) M))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D 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 l) (* (/ D (+ d d)) M)) (*.f64 (*.f64 (*.f64 D M) (/.f64 h (*.f64 d l))) #s(literal 1/2 binary64))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (/.f64 D (+.f64 d d))) M))))
(*.f64 (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)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) (/.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 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 h l) (/.f64 (*.f64 M D) (+.f64 d d))) (/.f64 (*.f64 M D) (+.f64 d d))))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) w0) 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 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
Calls

6 calls:

17.0ms
(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
7.0ms
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
6.0ms
(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
5.0ms
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
5.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))))
Results
AccuracySegmentsBranch
96.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)))))
96.2%3(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
96.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))))
95.8%3(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
95.8%3(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
96.2%3(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
Compiler

Compiled 78 to 82 computations (-5.1% saved)

regimes23.0ms (0.6%)

Memory
29.9MiB live, 29.9MiB allocated; 0ms collecting garbage
Counts
27 → 2
Calls
Call 1
Inputs
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 #s(approx (sqrt (* -1/4 (/ (* (* M M) h) l))) (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) #s(approx (* M (sqrt (neg (* 1/4 (/ h l))))) (/.f64 (*.f64 M (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h l)))) l)))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D)) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 (neg.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) l))) D)) (/.f64 w0 d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 #s(literal -1 binary64) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 h l)))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 w0 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 D #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 M (sqrt.f64 (neg.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h (/.f64 #s(literal 1 binary64) l)))))))))) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 M M) (/.f64 h l)) #s(literal -1/4 binary64))) D))) w0) d))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (neg.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 M M) h) l))) D))) d)))
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (/.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) l)))) w0) d))
#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 (*.f64 (*.f64 (*.f64 M D) D) M) h) l))))) d))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (/.f64 D (+.f64 d d))) M))) w0)
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 D M) (*.f64 D M)) (*.f64 (+.f64 d d) (+.f64 d d))) (/.f64 h l)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 D M) h) (*.f64 l (+.f64 d d))) (*.f64 D M)) (+.f64 d d)))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (*.f64 (/.f64 D (+.f64 d d)) M)))) w0)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 D (*.f64 M h)) (*.f64 d l)))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D 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 l) (* (/ D (+ d d)) M)) (*.f64 (*.f64 (*.f64 D M) (/.f64 h (*.f64 d l))) #s(literal 1/2 binary64))) (*.f64 (/.f64 D (+.f64 d d)) M)))))
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (* (/ h l) (* (/ D (+ d d)) M)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 M h) D)) (*.f64 l d))) (/.f64 D (+.f64 d d))) M))))
(*.f64 (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)
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 h l) (/.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 D (+.f64 d d)) M)) (*.f64 (/.f64 D (+.f64 d d)) M)))))
Outputs
#s(approx (* w0 (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l))))) (*.f64 w0 (/.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) l)))) (*.f64 #s(approx (sqrt (neg (* 1/4 (/ (* (pow M 2) h) l)))) (*.f64 (sqrt.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 h l))) M)) D)) d)))
(*.f64 w0 #s(approx (sqrt (- 1 (* (pow (/ (* M D) (* 2 d)) 2) (/ h l)))) #s(literal 1 binary64)))
Calls

4 calls:

7.0ms
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
5.0ms
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
5.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))))
5.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
94.7%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)))))
94.5%2(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
95.4%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)))
95.4%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))))
Compiler

Compiled 62 to 61 computations (1.6% saved)

regimes16.0ms (0.4%)

Memory
-14.7MiB live, 30.9MiB allocated; 2ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
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)))
Calls

15 calls:

3.0ms
(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
1.0ms
(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
1.0ms
(*.f64 #s(literal 2 binary64) d)
1.0ms
h
1.0ms
w0
Results
AccuracySegmentsBranch
67.1%1(*.f64 #s(literal 2 binary64) d)
67.1%1(*.f64 M D)
67.1%1D
67.1%1h
67.1%1d
67.1%1(/.f64 h l)
67.1%1w0
67.1%1M
67.1%1l
67.1%1(*.f64 w0 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))))
67.1%1(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l)))
67.1%1(sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))))
67.1%1(/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d))
67.1%1(pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
67.1%1(*.f64 (pow.f64 (/.f64 (*.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 h l))
Compiler

Compiled 93 to 140 computations (-50.5% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-2.699028529579897e+198
-2.7896948072775153e+196
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.359786489138185e-72
6.617489845836488e-39
0.0ms
-2.699028529579897e+198
-2.7896948072775153e+196
Compiler

Compiled 21 to 26 computations (-23.8% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-8427011425400.543
-9.547379150106101e-9
Compiler

Compiled 21 to 26 computations (-23.8% saved)

derivations25.0ms (0.6%)

Memory
-28.7MiB live, 22.1MiB allocated; 7ms collecting garbage
Stop Event
fuel
Compiler

Compiled 134 to 88 computations (34.3% saved)

preprocess167.0ms (4.1%)

Memory
32.6MiB live, 223.8MiB allocated; 55ms collecting garbage
Remove

(sort M D)

(negabs w0)

(abs d)

(abs D)

(abs M)

Compiler

Compiled 4 030 to 3 467 computations (14% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...